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Los programas que aparecen en este libro funcionan en los 
ordenadores: 


IBM-PC, XT, AT y compatibles. 
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MSX-Todos los modelos. 
COMMODORE-CBM 64 y CBM 128. 


INTRODUCCION A LA MUSICA =* 


AMOS a comenzar este capítulo y el libro con una intro- 
ducción a la terminología y notación musical, que nos ser- 
virá para entender los capítulos posteriores, en los que ve- 
remos cómo convertir una pieza musical en un programa 
de ordenador o cómo transformar el teclado en un diver- 
tido piano. 

Ante todo, no hay que dejarse abrumar por la notación 
musical. Aunque al principio pueda parecer muy críptica 
veremos que no es tan difícil como parece. Evidentemen- 
te, este capítulo no es un curso completo de solfeo, sino que tiene como 
objetivo familiarizar un poco al lector con el lenguaje musical. 
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EL PENTAGRAMA Y LAS NOTAS 


Vamos a comenzar por ver de qué medios se valen los compositores 
para poner su obra sobre el papel. 


La música se escribe sobre lo que se denomina pentagrama, que es una 
agrupación de cinco rayas tal y como muestra la figura 1.1. 


Fig. 1.1. Un pentagrama vacío. 


Los diferentes tonos musicales se representan en el pentagrama me- 
diante unos signos denominados notas. La altura de una nota en el penta- 
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grama indica su tono, de modo que cuanto más alta esté situada la nota, 
tendrá un tono más agudo, mientras que a medida que descienden, los to- 
nos van siendo cada vez más graves. 

Las notas se pueden escribir sobre las líneas del pentagrama o entre 
dos de ellas. La altura a la que se sitúa una nota en el pentagrama deter- 
mina su nombre. En la figura 1.2, podemos ver un ejemplo. Hemos repre- 
sentado los nombres de las notas en español (DO, RE, MI, ...), así como en 
inglés (C, D, E, ...). 


DI E E E 
CDEFGABCDEFGA 


DO RE MI FA SOL LA Sl DO RE MI FA SOL LA 


Fig. 1.2. Representación de las notas en el pentagrama. 


Podemos observar que cada siete notas los nombres se repiten, es de- 
cir, después de DO, RE, MI, FA, SOL, LA, SI, la siguiente nota vuelve a ser 
DO. Sin embargo, este segundo DO está más alto en el pentagrama que el 
primer DO, por tanto el tono será más agudo, concretamente es una octa- 
va más alto (agudo) que el primer DO. Por el contrario el primer DO será 
una octava más bajo (grave) que el segundo DO. Si hay notas demasiado 
altas o demasiado bajas que no caben en el pentagrama, su altura se indi- 
ca con unas pequeñas rayas adicionales que permiten ampliar el pentagra- 
ma. Sin embargo no conviene utilizar demasiadas rayas adicionales ya que 
esto dificultaría la lectura de la música. 


LA DURACION 


Ya sabemos representar el tono de una nota en el pentagrama, sin em- 
bargo, no todas las notas de una melodía duran lo mismo. Vamos a ver aho- 
ra cómo podemos representar su duración. 

No debemos olvidar que las duraciones de las notas son siempre valo- 
res relativos ya que dependen del «tempo» o velocidad a la que se inter- 
preta una composición, por lo tanto los valores del tiempo de las notas es- 
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tablecen su duración por comparación con otras. La figura 1.3 muestra los 
símbolos y duraciones de las notas, así como los nombres correspondien- 
tes a cada una. 


Redonda 


Blanca 


Negra 


Corchea 


Semicorchea 


Fusa 


Semifusa 


Fig. 1.3. Valores del tiempo de las notas. 


La redonda es, normalmente, la nota más larga mientras que la semi- 
fusa es la más corta, teniendo una duración de 1/64 de la duración de la 
redonda, es decir, una redonda dura lo mismo que 64 semifusas. También 
podemos obtener duraciones intermedias entre los valores establecidos. Si 
escribimos un puntillo (.) a continuación de una nota, la duración aumen- 
tará en 1/2 con respecto a la duración que tenía. Por ejemplo, si una ne- 
gra tiene una duración de 1/4 de redonda una negra con puntillo durará 
1/4 + 1/2 x 1/4 = 3/8 con respecto a la duración de la redonda. 

Por otra parte, en el pentagrama también podemos indicar períodos de 
silencio, durante los cuales no suena ninguna nota. Esto se consigue in- 
sertando pausas entre las notas. Estas pausas se representan con símbolos 
como los que se muestran en la figura 1.4. Las duraciones de estas pausas 
son las mismas que en las notas de su mismo nombre. 


LAS CLAVES Y LAS ESCALAS 


Antes dijimos que el pentagrama se podía ampliar con unas pequeñas 
líneas adicionales, sin embargo, para facilitar la lectura de la música se 


Za 


Silencio de redonda 


A aa _____—__ Silencio de blanca 


AA A O 


Fig. 1.4. Silencios. 


pueden utilizar dos pentagramas paralelos. Para que esto resulte efectivo 
es necesario que el intervalo tonal de los dos pentagramas sea distinto. 
Para indicar el intervalo tonal de un pentagrama se utiliza un signo que se 
sitúa al principio del mismo y que se denomina clave. La clave fija el tono 
de una nota determinada. Las dos claves más utilizadas, sobre todo en com- 
posiciones para piano, son las de SOL y FA. La clave de SOL es la de tono 
más alto y fija el tono de la nota situada en la segunda línea del pentagra- 
ma, haciéndola corresponder con el SOL de la cuarta octava del piano. La 
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clave de FA, más grave, hace corresponder el tono de la nota situada en 
la cuarta línea del pentagrama con el FA de la tercera octava del piano. 

Usando estas dos claves podemos abarcar fácilmente cuatro octavas tal 
y como muestra la figura 1.5. 


MI_SOL SI_ RE FA. LA 
RE_ FA LA DO MI SOL SI 


DEFGABCDEFGAB 


CDEFGABCDEFGAB 
DO En SOL SI RE FA LA 


RE FA LA DO MI SOL SI 


Fig. 1.5. Claves de SOL y FA. 


Podemos observar que la posición de una nota determinada depende 
de la clave en la que esté. La nota DO media del piano queda entre los dos 
pentagramas. 

Por otra parte, cada serie de ocho notas forma lo que se denomina una 
escala. La más sencilla es la de DO mayor que es la representada en la fi- 
gura 1.6, así como su situación en el piano. 


CDEFGABC 


o 
DO RE MI FA SOL LA SI DO 


Fig. 1.6. Situación de las notas en las teclas del piano. 


Podemos observar que la escala de DO mayor sólo utiliza las teclas blan- 
cas del piano. Sin embargo, entre las teclas blancas existen también teclas 
negras (excepto entre MI y FA y entre SI y DO). Si tocamos todas las teclas 
del piano (incluidas las negras) de izquierda a derecha, iremos avanzando 
de semitono en semitono. Después de tocar doce teclas habremos vuelto 
a la primera nota. Esta serie de doce semitonos se denomina escala cromá- 
tica. 

Todas las escalas mayores responden al mismo esquema tonal: tono-to- 
no-semitono-tono-tono-tono-semitono, por tanto para ejecutar otras esca- 
las mayores distintas de la de DO tendremos que utilizar las teclas negras 
del piano. A estas teclas se les designa por el nombre de cualquiera de las 
dos blancas adyacentes. Así por ejemplo, la tecla que está un semitono por 
encima de LA se llama LA sostenido (A+), pero como también está un se- 
mitono por debajo de SI la podemos llamar SI bemol (b). Por tanto todas 
las notas con sostenido serán un semitono más altas de lo normal y todas 
las nota con bemoles serán un semitono más bajas. En la figura 1.7 pode- 
mos ver representados los nombres de todas las notas correspondientes a 
una escala cromática del piano. 


REb  MIb soLb LAb  sIb RE b 
DO*  RE4 FA  SOL% LAF DO+ 


DO RE — MI FA SOL LA SI DO 


Fig. 1.7. Notas de la escala cromática en el piano. 


Si ponemos sostenidos o bemoles al principio de una partitura, inme- 
diatamente después de la clave, se les llama signatura de clave. Estos sos- 
tenidos y bemoles (conocidos en conjunto como alteraciones) se sitúan en 
las líneas o espacios del pentagrama correspondientes a la nota que se de- 
sea afectar durante toda la partitura. Así por ejemplo, un sostenido en la 
quinta línea del pentagrama en clave de SOL, o en la cuarta línea en clave 
de FA, indica que todas las notas FA que aparezcan en la partitura serán 
FA 4 y por tanto se elevarán siempre un semitono. En la figura 1.8 pode- 
mos observar algunos ejemplos de signaturas de clave. 

El efecto de un sostenido o un bemol puede ser cancelado por el signo 
becuadro (+) que devuelve la nota a su tono original. 
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RE mayor Sl mayor LA mayor MI mayor 
o o o (e) 
SI menor SOL menor FAH menor DO menor 


Fig. 1.8. Signaturas de clave. 


LOS COMPASES Y EL RITMO 


Los pentagramas se dividen en porciones, denominadas compases, que 
se indican con unas líneas verticales. Las líneas verticales dobles indican 
normalmente el final de un pasaje o de la pieza. Al principio de la partitu- 
ra se indica la duración del compás (tiempo) mediante dos números, uno 
encima del otro. El número superior indica el número de movimientos o 
golpes de que consta el compás mientras que el inferior indica la duración 
de cada uno de ellos. En la figura 1.9 se muestra un ejemplo. 


Número superior 
Línea de compás 


Doble línea 


Una medida 
o compás 


a 
2] 
E 
E] 
2 
S 
o 
7] 
= 
3 
z 


Fig. 1.9. Compases. 


En este ejemplo el tiempo es 2/4, lo que significa que cada compás 
consta de dos golpes, cada uno de los cuales tiene una duración equivalen- 
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te a una negra representada por el 4 (recordemos que 4 negras equivalen 
a una redonda). Existen diferentes tiempos de compases lo que posibilita 
distintos ritmos. 

Finalmente conviene señalar las diferentes formas en que se puede in- 
terpretar una nota. La nota en «staccato» se representa con un punto en- 
cima o debajo y se ejecuta recortando un poco su duración, dejando una 
breve pausa entre ella y la siguiente. El «ligado» es el efecto contrario. Se 
representa con un arco uniendo dos notas e indica que ambas se deben en- 
lazar de forma suave y continua. Si el arco une dos notas del mismo tono, 
estará formando una «ligadura», en cuyo caso sólo se ejecutará una nota 
con una duración equivalente a la suma de las dos notas ligadas. 

En la figura 1.10 podemos ver ejemplos de estas tres posibilidades. 


+ Ligadura 


Ligado + ++“ *=...- Staccato 


Fig. 1.10. Ejemplos de ligado, ligadura y staccato. 


J 


== EL AIRE 


El aire o tempo es el grado de lentitud o rapidez con que se debe inter- 
pretar una obra musical. 

El aire se expresa mediante términos, generalmente italianos, que se 
colocan al principio de la partitura en la parte superior del pentagrama. 

Los términos usados principalmente para expresar el aire son los si- 
guientes: 


Término Significado 

Largo Muy despacio 

Lento Muy despacio 

Adagio Despacio 

Andante Tranquilo Velocidad 
Allegro Aprisa creciente 
Presto Muy aprisa 

Vivace Muy aprisa 

Vivo Muy aprisa 


Por tanto el aire indica la velocidad de ejecución de una pieza musical. 
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EL SONIDO EN EL ORDENADOR al 


lo largo del presente capítulo vamos a estudiar cómo es 
posible la generación de sonidos en distintos ordenado- 
res. La mayoría de los ordenadores disponen de coman- 
dos BASIC específicos para la generación de sonidos 
como pueden ser BEEP, SOUND o PLAY. Sin embargo, la 
estructura de estos comandos suele variar bastante de un 
fabricante a otro, pudiendo producir desde sonidos senci- 
llos hasta espectaculares efectos sonoros, dependiendo de 
2 la complejidad del chip de sonido que lleve incorporado 
cada ordenador. Por tanto vamos a dividir el capítulo en el estudio sepa- 
rado de los comandos de sonido en los principales ordenadores del merca- 
do. 


—= EL SONIDO EN EL SPECTRUM 


En el SPECTRUM, la generación de sonidos se produce mediante la ins- 
trucción BEEP del BASIC, que tiene el siguiente formato: 


BEEP D,F 


donde el parámetro D es la duración del tono que va a sonar y se mide en 
segundos, y el parámetro F representa la frecuencia del sonido, expresada 
por un número entero comprendido en la gama que va desde -59 a +69. 
Cuanto menor sea el número de la frecuencia más grave será el tono del 
sonido y, a medida que aumentemos el valor de la frecuencia, aumentará 
el tono por toda la gama audible, pudiendo llegar a ser demasiado agudo 
para que lo capte el oído humano. 

Por otra parte, y de cara a nuestras próximas experiencias musicales, 
conviene indicar que la nota DO media en las escalas del piano, está re- 
presentada en el SPECTRUM por una frecuencia igual a 0. Si aumentamos 
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los valores de las frecuencias de uno en uno el tono del sonido producido 
aumentará de semitono en semitono. Lógicamente si disminuimos los va- 
lores de las frecuencias sucederá lo contrario. 

Después de esta breve explicación pasemos ya a realizar nuestras pri- 
meras experiencias sonoras. Comencemos por ver cómo varía la duración 
de una nota con el parámetro D. El programa 2.1 hace sonar siempre la 
misma nota, el DO medio (frecuencia 0), pero va aumentando su duración 
cada vez que la ejecuta. 


Programa 2.1. 


Conviene hacer notar que la duración D de la nota va expresada en se- 
gundos por tanto la primera nota que suena dura 0.01 segundos (una cen- 
tésima de segundo) y la última 5.12 segundos. Sin embargo, las pausas pro- 
ducidas por la instrucción PAUSE no van expresadas en segundos sino se- 
gún la equivalencia 50=1 segundo, lo que significa que la instrucción PAU- 
SE de la línea 90 del programa produce una pausa de medio segundo en- 
tre sonido y sonido. 

El programa 2.2 es una demostración de la gama completa de tonos dis- 
ponible en el SPECTRUM. 


Programa 2.2. 


Mediante un bucle FOR-NEXT hacemos variar el valor de la frecuen- 
cia desde -59, el tono más grave, a 69, el más agudo. Cada tono tiene una 
duración de medio segundo. 

Sin embargo, si queremos utilizar el SPECTRUM para aplicaciones mu- 
sicales muchos de estos tonos resultan demasiado graves o agudos. Un pia- 
no abarca una gama de tonos de siete octavas y cuarto (88 tonos) que 
corresponde a la gama de frecuencias que va desde -39 (LA) hasta 48 (DO). 
El programa 2.3 reproduce la escala cromática de la figura 2.1, a partir 
del DO medio. 


- MEU A A 
| A EE RS - E 4 ES, LP ds NA 


TAO A E E A) IFAI. . EE A, E 
"Le a vw 


Fig. 2.1. Escala cromática. 


Programa 2.3. 


Los nombres de las notas que componen la escala cromática se alma- 
cenan en líneas DATA y se van imprimiendo en pantalla a medida que van 
sonando. 

Sin embargo las escalas cromáticas suenan siempre un poco «raras». 
Por último el programa 2.4 hace que el ordenador interprete una escala 


1 


ul 


A E A 
60 READ F,N$ 
70 PRINT AT 11,153NS3" " 
80 BEEP 0.5,F 
90 PAUSE 5 
100 NEXT 1 
110 DATA 0,"DO0",2,"RE",4,"MI",5,"FA" 
120 DATA 7,"S0L",9,"LA",11,"SI",12,"DO" 


Programa 2.4. 


En este caso es necesario almacenar en líneas DATA la frecuencia de 
cada tono (también almacenamos el nombre de cada nota), ya que al no 
ser el incremento del tono constante a lo largo de la escala, no se puede 
representar con el índice del bucle FOR-NEXT. Podemos observar que de 
MI (frecuencia 4) a FA (frecuencia 5) el incremento es de un semitono, al 
igual que de SI a DO, mientras que en el resto de las notas el incremento 
es de un tono. 


EL SONIDO EN EL AMSTRAD 


El AMSTRAD utiliza la instrucción SOUND del BASIC para la genera- 
ción de sonidos. SOUND admite hasta siete parámetros de los cuales sólo 
los dos primeros son imprescindibles, mientras que los cinco restantes son 
opcionales. El formato completo de SOUND es el siguiente: 


SOUND C, T, D, V, EV, ET, R 


donde C indica la situación de los canales (el AMSTRAD dispone de tres 
canales de sonido); T es el período de tono, es decir, la forma técnica de 
especificar el tono del sonido, o lo que es lo mismo, la nota; D especifica 
la duración del sonido en centésimas de segundo (1=0.01 segundos); V ex- 
presa el volumen del sonido que se va a generar; EV es la envolvente de 
volumen que permite variar el volumen de una nota mientras está sonan- 
do; ET es la envolvente de tono que, análogamente a la envolvente de vo- 
lumen, permite variar el tono de una nota mientras está sonando; por úl- 
timo R es el período de ruido que permite la generación de ruidos, es de- 
cir, sonidos poco musicales. 
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E 5 o 

E 2 $ 

o 3 $ 

ba 2 2 

$ $ E $ E 
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1 ] ] ' ! ! ] 

1 1 1 1 ] ] I 

] ] 1 ] 1 ' ] 

Ú U ' U D ! ' 

v v Y v v v v 
SOUND C y T9D 92. .—Voy EVO ET 3 o R 


SELECCION DE CANALES NUMEROS DE DURACION 


implícito: 20 


EA 1. Margen: -32768 a 
Seleccionar canal A +32767 


Seleccionar canal B 
Seleccionar canal C Valor Efecto 

Sincronizar con A Duración del sonido 
Sincronizar con B 


Duración controlada 
Sincronizar con C por ENV 


Retener z 
Número de veces que 
Borrar cola se repite la envolvente 


Fig. 2.2. Los parámetros de SOUND en AMSTRAD. 


En este capítulo nos vamos a centrar en los cuatro primeros paráme- 
tros, dejando los restantes, de mayor complejidad, para capítulos posterio- 
res. 
El AMSTRAD dispone de tres canales de sonido: A, B y C que pueden 
actuar independientemente o simultáneamente produciendo acordes y 
otros efectos interesantes. Para ello el valor que se le puede asignar al pa- 
rámetro C es un número entero comprendido entre 1 y 255, lo que nos da 
una idea de todas las situaciones de canales diferentes que podemos obte- 
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ner. Sin embargo, de momento sólo nos vamos a centrar en los primeros 
valores con los que se seleccionan los tres canales individualmente, tal y 
como se muestra en la figura 2.3. 


Canal Valor 


| 


Fig. 2.3. Números de selección de canales en AMSTRAD. 


De modo que, por ejemplo, la instrucción SOUND2 seleccionará el ca- 
nal B para producir sonido, aunque aún falta, por lo menos, otro paráme- 
tro. 

El segundo parámetro, T, define el tono del sonido en función de su pe- 
ríodo. A cada tono le corresponde una frecuencia y a cada frecuencia un 
período. El parámetro T puede tomar cualquier valor entero comprendi- 
do entre 0 (agudos) y 4095 (graves). El valor que utilicemos en cada caso 
puede corresponder a una nota situada dentro de las ocho octavas que pue- 
de abarcar el AMSTRAD. En la figura 2.4 podemos ver una tabla con los 
valores de los períodos de tono para cada una de las 96 notas que abarca 
el AMSTRAD, así como la frecuencia del tono y el error relativo produci- 
do al redondear el período a un valor entero (error sólo apreciable por los 
oídos más expertos). 
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LA 
LAR 


s1 


NOTA 


DO 
DOR 
RE 
RERH 
MI 
FA 
FAR 
SOL 
SOL+ 
LA 
LAR 
sI 


FRECUENCIA 


32.793 
34,648 
36.728 
38.891 
41.293 
43.654 
46.249 
48.999 
51.913 
55.999 
58.279 
61.735 


FRECUENCIA 


65.486 
69.296 
73.416 
27.782 
82.497 
87.307 
92.499 
97.999 
193.326 
119.909 
116.541 
123.471 


PERIODO ERROR RELATIVO 


3822 
3698 
3493 
3214 
3934 
2863 
2793 
2551 
2498 
2273 
2145 
2925 


-D.DB7% 
+9. 987% 
-9.997% 
-9.004% 
+9.999% 
-9.016% 
+9.009% Octava 
-9.992% 
+9.995% 
+9.912% 
-9. 993% 
+9.911% 


PERIODO ERROR RELATIVO 


1911 
1894 
1793 
1607 
1517 
1432 
1351 
1276 
1294 
1136 
1973 
1912 


-9. 907% 
Y. 087% 
+9.922% 
-9.904% 
+9.999% 
+9.919% 


-=3 


-9.028% Octava -2 


+9. 937% 
+9.993% 
-8.932% 
+9.939% 
-9.938% 


FRECUENCIA PERIODO ERROR RELATIVO 


139.815 
138.591 
146.832 
155.564 
164.814 
174.614 
184.997 
195.998 
207.652 
229.999 
233.982 
246.942 


956 
992 
851 
8g4 
758 
716 
676 
638 
692 
568 
536 
596 


+9.046% 
+9. 907% 
-9.B37% 
+9.958% 
-9.057% 
+9.919% 
+9.946% Octava -1 
+9.D37% 
+9. 805% 
-BD.B32% 
-9. 955% 
-0. 838% 
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NOTA FRECUENCIA PERIODO ERROR RELATIVO 


DO 261.626 478 +9.046% DO media 
DO+ 277.183 451 +9.907% 
RE 293.665 426 +9.981% 
* RER 31.127 492 +9.958% 
m1 329.628 379 -9.957% 
FA 349.228 358 +9.919% 
FAR 369.994 338 +9.046% Octava Y 
soL 391.995 319 +9.937% 
SOLH 415.395 391 +9.905% 
LA 449.999 284 -98.932% LA internacional 
LAH 466.164 268 -9.955% 
sI 493.883 253 -8.938% 


NOTA FRECUENCIA PERIODO ERROR RELATIVO 


DO 523.251 239 +9.046% 
DOR 554.365 225 -9.215% 
RE 587.339 213 +9.981% 
REH 622.254 291 +9.0958% 
MI 659.255 199 +9. 296% 
FA 698.457 179 +9.919% 
FAR 739.989 169 +9.046% Octava 1 
SOL 783.991 159 -9.277% 
SOL+H 830.699 159 -9.328% 
889.999 142 -9.032% 
LAR 932.328 134 -94.955% 
987.767 127 +9.356% 


r 
D 


10) 
m 


z 
[0] 
pur! 
D 


FRECUENCIA PERIODO ERROR RELATIVO 


[e] 
o 


1£46.592 119 -0.3/1% 
1105.73 213 +9.229% 
1174.657 196 -8.390% 
1244.308 105 -9.441% 
1318.519 95 +9. 206% 
1396.913 39 -94.543% 
1479.778 84 -9.548% 
1567.982 eg +9.359% 
1661.219 25 -9.328% 
1769.999 71 -9.932% 
1364.655 67 -8.955% 
1975.533 63 -9. 435% 


xr x= 
0) 
m 


X= 


>> 007110900 
x= x= 
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FRECUENCIA PERIODO ERROR RELATIVO 


2097.904 69 +9.462% 
2217.461 Sé -8.662% 
2349.318 53 -9.399% 
2489.016 59 -9.441% 
2637.9821 92? -94.855% 
2793.826 45 +9.574% 
2959.955 42 -94.548% Octava 3 
3155.963 49 +9. 459% 
3322.438 38 +9.992% 
3529 .9099 36 +1.357% 
3729.31 34 +1.417% 
3951.966 32 +1.134% 


FRECUENCIA PERIODO ERROR RELATIVO 


4186.09 39 +9.462% 
4934.922 28 -0.662% 
4698.636 27 +1.469% 
4978.932 25 -8.441% 
5274.941 24 +1.246% 
5587.652 22 -1.685% 
5919.911 21 -94.548% 
6271.927 29 +9. 350% 
6644.875 19 +8.992% 
7949. 999 18 +1.357% 
7458.621 17 +1.417% 
7992.133 16 +1.134% 


Fig. 2.4. Tabla de notas, frecuencias y períodos de tono correspondientes. 


Las frecuencias se calculan a partir de la correspondiente al LA inter- 
nacional (frecuencia 440), mediante la fórmula siguiente: 


FRECUENCIA = 440 * (2” (OCTAVA + (N-10)/12)) 


donde N vale 1 para DO, 2 para DO),... y 12 para SI. 
A partir de la frecuencia se calcula el período mediante la fórmula: 


PERIODO = ROUND (125000/FRECUENCIA) 


Bueno pues ya podemos intentar algunas experiencias. El programa 2.5 
reproduce una escala cromática a partir del DO medio por el canal A. 


ZN 


Programa 2.5. 


Tanto los períodos como los nombres de las notas están almacenados 
en líneas DATA. El bucle FOR-NEXT de la línea 100 produce una pausa en- 
tre nota y nota. En este programa hemos utilizado únicamente los dos pa- 
rámetros obligatorios para SOUND. 

El parámetro D nos permite especificar la duración del sonido. Si lo 
omitimos el ordenador toma por defecto 20 centésimas de segundo. Efec- 
tivamente esta ha sido la duración de cada nota en el programa anterior 
(2.5). El valor máximo que podemos dar a D es de 32767. Experimente- 
mos ahora con el programa 2.6. 
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Programa 2.6. 


El programa permite al AMSTRAD ejecutar una escala en DO mayor 
con la particularidad de que cada nota dura el doble de la anterior, ya que 
la duración se multiplica por dos en la línea 120, por tanto el primer DO 
dura 0,02 segundos (línea 60) mientras que el segundo DO (octava nota) 
dura 2,56 segundos. El bucle FOR-NEXT de la línea 130 produce una pe- 
queña pausa entre nota y nota. Finalmente, los tonos de las notas, así como 
sus nombres correspondientes, están almacenados en las líneas DATA del 
final del programa y su lectura se realiza en la línea 80. 

Por último, el parámetro V, nos permite asignar un volumen distinto a 
cada sonido. El valor que puede tomar V es un número entero compren- 
dido entre 0 y 15, siendo O el mínimo y 15 el máximo. Cuando no se espe- 
cífica ningún valor para el volumen, el AMSTRAD toma por defecto el 12. 
Para observar las variaciones de volumen podemos probar a ejecutar el 


Programa 2.7. 


Este programa ejecuta una escala en DO mayor ascendente en la cual 
va aumentando el volumen progresivamente gracias al bucle FOR-NEXT 
de las líneas 60-80. A continuación ejecuta la misma escala pero en senti- 
do inverso (descendente) a la vez que va disminuyendo el volumen me- 
diante el bucle decreciente de las líneas 90-110. Tanto los tonos como los 
nombres de cada nota se almacenan en líneas DATA. La subrutina de las 
líneas 200-250 se encarga de realizar la lectura de cada nota, así como de 
imprimirla en pantalla y generar su sonido. 

Finalmente, el programa 2.8 nos permite probar distintos sonidos del 
AMSTRAD seleccionando el tono, la duración y el volumen. 


LCJIMEN. (1%) ".U 
WU a A e 


15.14: PRITINT "UM. LME] 
2 LOLARHIE 1Oy1 Ta rTTMiiNNt VU! 


Programa 2.8. 
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EL SONIDO EN EL IBM 


El IBM dispone únicamente de un canal de sonido, sin embargo tiene 
la posibilidad de generar sonidos con dos instrucciones distintas: SOUND 
y PLAY. Vamos a comenzar por la primera, que es más sencilla. La ins- 
trucción SOUND tiene el siguiente formato: 


SOUND F,D 


donde el parámetro F es la frecuencia del sonido expresada en Herzios. 
Debe ser una expresión numérica perteneciente al rango de 37 a 32767. 
Cuanto mayor sea el valor de la frecuencia más alto será el tono del soni- 
do generado. 

Para saber las frecuencias correspondientes a las ocho octavas utiliza- 
das normalmente en música podemos consultar la tabla de la figura 2.4. 
Por otra parte, el parámetro D es la duración del sonido expresada en tic- 
tac de reloj, sabiendo que 1 segundo equivale a 18,2 tic-tac. La duración 
debe ser una expresión numérica comprendida entre O y 65535. 

La sentencia SOUND, produce un sonido y continúa la ejecución del 
programa hasta que llega a una nueva sentencia SOUND. Si la duración de 
la nueva sentencia SOUND es 0 la sentencia actual SOUND, que se está eje- 
cutando, se desconecta. En cualquier otro caso el programa espera a que 
finalice el primer sonido antes de ejecutar la nueva sentencia SOUND. 

Para crear períodos de silencio podemos utilizar SOUND 32767,D, ya 
que la frecuencia 32767 es demasiado aguda para ser percibida por el oído 
humano. 

En la figura 2.5 podemos ver una tabla que muestra los «tempos» mu- 
sicales típicos en términos de tic-tac de reloj. 

El programa 2.9 es un ejemplo del funcionamiento de SOUND, en el 
que varía simultáneamente el tono y la duración. 

La línea 100 produce un período de silencio entre nota y nota. En lí- 
neas DATA están almacenados los nombres de las notas correspondientes 
a una escala en DO mayor, así como sus frecuencias asociadas. 

Por otra parte, el IBM también puede generar sonidos mediante la sen- 
tencia PLAY. Esta instrucción está más asociada con la música que 
SOUND, ya que sólo permite ejecutar los tonos correspondientes a las sie- 
te octavas habituales. El formato de PLAY es el siguiente: 


PLAY cadena 


donde cadena es una expresión de caracteres que consiste en mandatos 
de música de un solo carácter. PLAY introduce un «lenguaje de definición 
de melodía» en una cadena de caracteres. 
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Pulsa- 
Tempo ciones/ | Tic-tac/ 
Minuto | Pulsación 


muy lento Muy largo 
Largo 40-60 |27.3-18.2 
Larguetto 60-66 |18.2-16.55 
Grave 
Lento 
Adagio 66-76 |16.55-14.37 


lento Adagietto 
Andante 76-108 | 14.37-10.11 
moderado Andantino 
Moderato 198-129 | 1P.11-9.1 
Allegro 120-168 | 9.1-6.5 
Vivace 
Veloce 
muy Presto 168-208 | 6.5-5.25 
rápido  Prestissimo 


Fig. 2.5. Tempos expresados en tic-tac de reloj. 


Programa 2.9. 


Los mandatos de música de un solo carácter que se pueden emplear 
en PLAY son los siguientes: 


DeAaG: Emite la nota indicada en la octava actual, teniendo en cuen- 
ta la correspondencia entre notación inglesa y española 
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On: 


Ln: 


Tn: 


MF: 


(DO=C, RE=D, ... LA=A, SI=B). Después de la nota se puede 
añadir un signo F o + que indican un sostenido, o un signo 
- que indica un bemol. Estos signos no se pueden emplear 
si la nota no corresponde a una tecla negra del piano, por 
ejemplo EX no sería válido (MIA es lo mismo que FA). Ejem- 
plo: PLAY «CDEFGAB>» 

Carga la octava deseada. Hay 7 octavas numeradas de O a 6, 
que son los valores que puede tomar n. La octava 3 es la 
que comienza con el DO central (C). La octava 4 se asume 
por defecto. Ejemplo: PLAY «03 CDE 04 CDE 05 CDE». 
Eleva una octava y toca la nota especificada en n. 
Desciende una octava y toca la nota especificada en n. 

Toca la nota n. El parámetro n puede tomar cualquier valor 
entero comprendido entre 0 y 84. El valor 0 indica silencio, 
mientras que el resto de los valores corresponden a las 84 no- 
tas que abarcan las siete octavas. Es una forma alternativa de 
selección de notas, además de la ya explicada de selección 
de octava (On) y nota (A-G). Ejemplo: PLAY «N49 N51 N53». 
Define la duración de las notas siguientes. La duración real 
(relativa) es 1/n. El parámetro n puede estar en el rango de 
l a 64, con la equivalencia siguiente: 


¡A redonda 
Vo blanca 
Aaa negra 
Pa corchea 
Ll semicorchea 
Lp fusa 
Lcda semifusa 


aunque también se pueden asignar valores intermedios. Si 
sólo se quiere variar la duración de una nota, se puede espe- 
cificar su valor a continuación de dicha nota. Por ejemplo 
A8 es lo mismo que L8A. Ejemplo: PLAY “«C1 D2 E4 F8 G16 
A32 B64». 

Representa la duración de un silencio del mismo modo que 
Ln. 

Puntillo. Se puede colocar después de una nota o de un si- 
lencio, produciendo los efectos explicados en el capítulo 1. 
Se puede poner más de un puntillo, por ejemplo, una blanca 
con dos puntillos tendrá una duración equivalente a una 
blanca más una negra más una corchea. 

Define el «tempo» (aire). El valor de n debe estar compren- 
dido entre 32 y 255. 

Música de primer plano. Cada nota no empezará hasta que 


2.7 


ML: 
MS: 


X variable: 


no haya concluido la anterior. MF es el estado asumido por 
el ordenador por omisión. 

Música de fondo. Cada nota se coloca en una memoria inter- 
media que permite que continúe la ejecución del programa 
en BASIC mientras suena la música. 

Música normal. Cada nota suena 7/8 de la duración especi- 
ficada con Ln. Este es el estado que el ordenador toma por 
defecto para MN, ML y MS. 

Ligado. Cada nota suena el total de su duración. 

Staccato. Cada nota suena 3/4 de la duración especificada 
con Ln. 

Ejecuta la cadena de caracteres especificada en la variable. 
En este caso es obligatorio poner un punto y coma tras la va- 
riable. 


En todos estos mandatos el parámetro n puede ser una constante o, 
con el signo =, una variable. 

El programa 2.10 ejecuta la escala en DO mayor descendente desde la 
octava 6 hasta la 0. 


Programa 2.10. 


En la línea 70 asignamos a la variable ESCALA$ una cadena musical 
compuesta por las 7 notas que componen una escala descendente (de SI 


a DO). 


La línea 80 ejecuta dicha escala en la octava 6. A continuación, median- 
te un bucle FOR-NEXT que se repite 6 veces se va repitiendo la escala pero 
cada vez una octava más baja, hasta alcanzar la octava 0. 

En capítulos posteriores veremos más en profundidad todos estos man- 
datos de modo que podamos sacarles el máximo rendimiento. 
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EL SONIDO EN EL COMMODORE 


La generación de sonidos en el COMMODORE puede parecer, en un 
principio, más compleja que en los demás ordenadores ya que no dispone 
de ninguna instrucción BASIC específica para el sonido. Sin embargo, el 
COMMODORE cuenta con un chip de sonido, el SID, con características 
similares al del AMSTRAD, es decir, puede disponer de hasta tres canales 
de sonido, a la vez que libera al ordenador para que realice otras tareas 
simultáneamente. 

Otra peculiaridad del COMMODORE es que, a diferencia de los demás 
ordenadores, no cuenta con un altavoz incorporado por lo que los sonidos 
los emite a través del altavoz del televisor. 

El SID cuenta con 29 registros que van desde la posición de memoria 
54272 hasta la 54300. Cada uno de estos registros tiene una función espe- 
cífica que iremos viendo poco a poco. A grandes rasgos podemos decir 
que cada uno de los tres canales de sonido se controla mediante siete re- 
gistros. De los ocho registros restantes, cuatro de ellos tienen funciones 
que afectan a la vez a las tres voces y los otros cuatro funciones especia- 
les. Cada vez que queramos producir un sonido determinado deberemos 
actuar sobre algunas de estas direcciones de memoria de la forma siguien- 
te: 

POKE DM, V 
donde DM es la dirección de memoria sobre la que se actúa, y el paráme- 
tro V es el valor numérico que se asigna a dicha posición de memoria. 

Pasemos a estudiar ahora la función de cada una de estas posiciones 
de memoria. En primer lugar, antes de realizar ninguna operación, es con- 
veniente «limpiar» todos los registros de sonido, es decir, ponerlos a cero, 
de lo contrario podrían aparecer sonidos inesperados. Esto se consigue 


ERRE EAN 
20 REM OR LIMPIEZA DE REGISTROS * 
= COMMODOR 


= Pa — - == = Má a 3 - 


Programa 2.11. 
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con un sencillo bucle como el que muestra el programa 2.11, que recorre 
cada una de las posiciones de memoria. 

Este bucle lo pondremos siempre al principio de nuestros programas 
musicales. Después de esto hay que definir el nivel de volumen deseado. 
La dirección correspondiente al volumen es la 54296 y el nivel de volú- 
men que podemos asignar es un valor entero comprendido entre O (míni- 
mo) y 15 (máximo). La siguiente instrucción ajustaría el volumen al máxi- 
mo. 


POKE 54296,15 


Tras el volumen deben establecerse los parámetros del modulador de 
amplitud para cada una de las voces que se van a usar. Estos parámetros 
definen la denominada envolvente de volumen de un sonido y se puede re- 
presentar con una curva como la de la figura 2.6. 


INTENSIDAD 
DEI. SONIDO 


Volumen 
máximo 


Volumen de 
sostenimiento 


» 1 se TA 
tataque—> a +— caída —> ¡ Fsostenimiento> +— relajación > 


TIEMPO 


Fig. 2.6. Envolvente de volumen de un sonido. 


Podemos observar que la intensidad de una nota va cambiando mien- 
tras suena. Durante el primer período, denominado de ataque, el volumen 
del sonido crece hasta el nivel máximo. A continuación empieza a descen- 
der, en el período denominado caída, hasta un cierto nivel de manteni- 
miento. El tercer período, denominado de sostenimiento, el volumen se 
mantiene hasta que alcanza el período de relajación durante el cual el so- 
nido se extingue. Para introducir estos datos tenemos que seleccionar el 
nivel de sostenimiento a utilizar que debe estar comprendido entre 0 y 15 
y los valores de ataque, caída y relajación correspondientes a los tiempos 
que se requieran según la tabla de la figura 2.7. 
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0 
1 
2 
3 
4 
5 
6 
7 
8 
9 


Fig. 2.7. Tabla de valores de ataque, caída y relajación. 


Los valores seleccionados se introducen en dos registros, uno de ata- 
que-caída y otro de sostenimiento-relajación. Las direcciones respectivas 
de estos dos registros son 54277 y 54278 para el canal 1, 54284 y 54285 
para el canal 2 y 54291 y 54292 para el canal 3. Para introducir los valo- 
res, por ejemplo, en el canal 1, podemos utilizar las siguientes sentencias: 


POKE 54277, A*16+C 
POKE 54278, S*16+R 


siendo A el valor seleccionado para el ataque, C el de caída, S el de soste- 
nimiento y R el de relajación. 

A continuación, hay que establecer la frecuencia del sonido que se de- 
sea producir. Para ello hay que fijar dos valores denominados parte baja 
de la frecuencia y parte alta. Estos dos valores se introducen en sendos re- 
gistros que son respectivamente los de direcciones 54272 y 54273 para la 
voz 1, 54279 y 54280 para la voz 2, y 54286 y 54287 para la voz 3. Por ejem- 
plo las instrucciones: 


POKE 54272, 37 
POKE 54273, 17 


introducen los valores de frecuencia correspondientes el DO medio en el 
canal 1. 

El COMMODORE puede abarcar ocho octavas equivalentes a las utili- 
zadas habitualmente en música. Los valores de altas y bajas frecuencias 
correspondientes a las 96 notas están representados en la tabla de la figu- 
ra 2.9, 
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Álta frecuencia Baja frecuencia 


DO 0 1 18 
DO sostenido 0 1 35 
RE 0 1 52 
RE sostenido 0 1 70 
MI sostenido 0 1 90 
FA sostenido 0 1 110 
FA sostenido 0 1 132 
SOL 0 1 155 
SOL sostenido 0 1 179 
LA 0 1 205 
LA sostenido 0 1 133 
SI 0 2 6 
DO 1 2 37 
DO sostenido 1 2 69 
RE 1 2 104 
RE sostenido 1 2 140 
MI 1 2 179 
FA sostenido 1 Z 220 
FA 1 2 8 
SOL 1 3 54 
SOL sostenido 1 3 103 
LA 1 3 155 
LA sostenido 1 2 210 
SI 1 4 12 
DO 2 4 73 
DO sostenido 2 4 139 
RE 2 4 208 
RE sostenido 2 5 25 
MI 2 5 103 
FA 2 5 185 
FA sostenido Z 6 16 
SOL 2 6 108 
SOL sostenido 2 6 206 
LA 2 7 53 
LA sostenido Z 7 163 
SI 2 8 23 
DO 3 8 147 
DO sostenido 3 9 21 
RE 3 9 159 
RE sostenido 3 10 60 
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MI 

FA 

FA sostenido 
SOL 

SOL sostenido 
LA 

LA sostenido 
SI 

DO 

DO sostenido 
RE 

RE sostenido 
MI 

FA 

FA sostenido 
SOL 

SOL sostenido 
LA 

LA sostenido 
SI 

DO 

DO sostenido 
RE 

RE sostenido 
MI 

FA 

FA sostenido 
SOL 

SOL sostenido 
LA 

LA sostenido 
SI 

DO 

DO sostenido 
RE 

RE sostenido 
MI 

FA 

FA sostenido 
SOL 


DOO0OOdDODOSOoSacoO$OuUIYáadoáa daa há, OA QA QA QA QA O Qe q qe e e q e q qa q 0) (Y Q 0 0 a a 


141 


126 


127 


172 


161 
105 


254 
194 
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SOL sostenido 
LA 

LA sostenido 
SI 

DO 

DO sostenido 
RE 


RE sostenido 
MI 

FA 

FA sostenido 
SOL 

SOL sostenido 
LA 

LA sostenido 
SI 


XA YY Y A SY SY SY SY SY SA SADO 


Fig. 2.8. Tabla de notas y sus frecuencias para COMMODORE. 


Finalmente, es necesario definir la forma de la onda que se va a pro- 
ducir. El COMMODORE dispone de cuatro formas de onda posibles. Las 
direcciones de memoria correspondientes a la forma de onda son: 54276 
para la primera voz, 54283 para la segunda y 54290 para la tercera. Los 
nombres y valores que se asignan a cada forma de onda están recogidos 
en la figura 2.9. 


Triangular 


Diente de sierra 
Cuadrada 


Fig. 2.9. Formas de onda para el COMMODORE. 


Podemos observar que para cada forma de onda se recogen dos valo- 
res. La razón es que cuando se introduce el primer valor (comienzo de la 
nota) en el registro correspondiente se inicia el ciclo de la envolvente en 
el que el período de sostenimiento durará hasta que el registro tome el va- 
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lor de fin de la nota. En este momento comenzará el período de relajación 
según el valor elegido. 

Bueno, con todo lo visto ya podemos empezar a experimentar con al- 
gún programa sonoro. Por ejemplo el programa 2.12 nos permite escuchar 
los distintos efectos del modulador de amplitud al variar los valores de ata- 
que, caída, sostenimiento y relajación. 


10 REM ARIANE 

20 REM +* MODULADOR DE AMPLITUD + 

30 REM * COMMODORE * 

B20 REM RIIIE RR 

50 FOR 1=54272! TOD 54296! 

60 POKE-1,0 

do 

80 POKE 54296!',153 

90- A=6 :D=6 :5=6:R=6 

100 PRINT-CHR+$(147) 

110 PRINT "ATAQUE", “CAIDA",“SOSTEN","RELAX", 
AyD,S,R 

120 FOR I=i TO 8 

130 POKE 54277! ,Ax*16+D 

140 POKE 354278! ,S*16+R 

150 READ EF,AF 

160 POKE 54272! ,BF:POKE 54273! ¿AF 

170 POKE-5427651,339 

180 FOR —T=1- TO 10073NEXT-T 

190 POKE 34276! ,32 

200 NEXT 1 

210 PRINT -S5PEC(200) 

220 PRINT "PULSA UNA TECLA DE FUNCION PARA 
VARIAR LOS VALORES DE LA ENVOLVENTE” 
230 GET -A$S11F- Af="" THEN GOTO 230 

240 IF ASC(AF)<133 OR ASC(A+$) >+140 THEN 
GOTO 230 

250 ON ASC(AS)-132 GOSUB 300,320,340,360, 
380 ,400,420,440 

260 RESTORE 

270 GOTO 100 

280 TATA-75,35,126,38,52,43,198,453 

290 DATA-97,51,172,57,188,64,149,68 
300 A=A+1:I1F A>15 THEN A=6 

310 RETURN 

320 D=D+1:1F-D>15 THEN D=6 

330 RETURN 

340 S=S+1:I1F S>15 THEN S=6 

350 RETURN 

360—R=R+1:21F-R>15 THEN R=6 


li 


Programa 2.12. 


El bucle FOR-NEXT de las líneas 50-70 pone todos los registros de so- 
nido a cero. A continuación, en la línea 80 ajustamos el volumen máximo. 
En la línea 90 establecemos los valores iniciales de ataque, caída, sosteni- 
miento y relajación. El bucle FOR-NEXT de las líneas 120-200 interpreta 
una escala en DO mayor con los valores establecidos para la envolvente. 
En la línea 130 se introduce el valor de ataque-caída para el canal 1. Asi- 
mismo en la línea 140 se introduce el valor de sostenimiento-relajación, 
también para el canal 1. 

La línea 160 introduce los valores de baja frecuencia y alta frecuencia 
correspondientes en los registros asignados al canal 1. En la línea 170 es- 
tablecemos una forma de onda en diente de sierra. La nota sonará mien- 
tras se ejecuta el bucle FOR-NEXT de la línea 180. A continuación la línea 
190 marca el final de la nota. Finalmente podemos variar los valores de la 
envolvente, aumentando o disminuyendo cada uno de ellos, según la tecla 
de función (Fl ... F8) que pulsemos. La escala musical volverá a sonar con 
la nueva envolvente definida. Por último, las líneas DATA almacenan los 
valores de bajas y altas frecuencias de las ocho notas correspondientes a 
la quinta octava. 

El programa 2.13 nos permite apreciar los diferentes timbres que po- 
demos obtener variando la forma de la onda. 


STA 


A 
¿41M UMHMIH ] 


Programa 2.13. 


Al ejecutarlo podremos escuchar una escala en DO mayor descendente 
que se repetirá cuatro veces con distintas formas de onda. 

Por último, en la figura 2.10 podemos ver una tabla-resumen de los re- 
gistros del SID y sus funciones. La columna SID+ representa los valores 
que habría que sumar a la variable SID (suponiendo SID=54272) para ob- 
tener la dirección de memoria adecuada. 


EL SONIDO EN MSX 


El sistema MSX posee un chip de sonido, el PSG, que podemos contro- 
lar desde el BASIC mediante la instrucción SOUND. El PSG consta de 16 
registros, cada uno de los cuales almacena la información de una carac- 
terística del sonido. De estos 16 registros nosotros sólo podemos utilizar 
los 14 primeros numerados del 0 al 13. La instrucción SOUND nos permi- 
te alterar el valor de estos registros SOUND tiene el siguiente formato: 


SOUND R,CS 


siendo R el número de registro sobre el que vamos a actuar (0-13) y CS la 
característica sonora que aporta dicho registro, pudiendo ser cualquier va- 
lor comprendido entre 0 y 255. 

Veamos ahora el significado de cada registro. El PSG puede producir 


IL 


Dirección 


Función Valor en el registro 


Parte baja de la frecuencia 
Parte alta de la frecuencia [0-255 (tabla) 
Parte baja de ancho de pulso|0-255 

Parte alta de ancho de pulso [0-15 


Forma de onda 


0-255 (tabla) 


Forma+ si IponS 

0 si se quita 
16+ Ataque + caída 
16+ sostenimiento + rela- 
jación 


Ataque-caída 
Sostenimiento-relajación 


Parte baja de la frecuenc. de 
corte 

Parte alta de la frecuenc. de 
corte 


54294 


el si fil 
tra voz 
1 
e2 si fil- 
Reson. (415+16+tra voz 2 
e si fil 
tra voz 
4 


54295 Resonancia y filtros 


64 Si HP 


“Tipo de filuo y volumen 32 Si BP+VOL (015) 


Potenciómetm 1 
Potenciómetro 2 
Oscilador 3 

Envolvente 3 


54298 
54299 


Fig. 2.10. Tabla resumen del SID del COMMODORE. 


simultáneamente tres señales de tono y una de ruido las cuales se envían 
al altavoz a través de los canales A, B y C. 

El tono de cada canal se determina cargando los valores de frecuencia 
deseados en los registros del O al 5 (0-1 canal A, 2-3 canal B y 4-5 canal 
C). El registro 6 se utiliza para cargar la frecuencia de ruido. El registro 7 
sirve-para seleccionar los canales que emiten tono y los que emiten ruido. 
Los 3 canales pueden emitir tono y ruido simultáneamente o por separa- 
do. El volumen de cada canal se ajusta en los registros 8, 9 y 10 (canales 
A, B y C respectivamente). Los registros 11 y 12 se utilizan para controlar 
el período de la envolvente de la onda sonora. Finalmente el registro 13 
define el tipo de envolvente que vamos a utilizar. La figura 2.11 muestra 
una tabla esquemática de estos registros. 

Hemos visto que cada canal utiliza dos registros para seleccionar el 
tono. Realmente de estos dos registros sólo se utilizan 12 bits, los 8 bits me- 
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A a a 
A, T 

CT (A) 
E El FT (B) 
EX Frecuencia canal B ; 88 CT (8) 


FT (C) 
Frecuencia canal C 
CT (C) 


| Frecuencia ruido | ruido 


| Sonoridad canal A | canal A L (A) 


FT (E) 


CT (E) 


E] Pouta de la envolvente 


Fig. 2.11. Tabla de funciones de los registros de sonido en MSX. 


nos significativos corresponden al primer registro y los 4 bits más signifi- 
cativos al segundo. Para determinar el tono podemos utilizar la fórmula: 


= 1789772.5/(16*F) 


donde F es la frecuencia correspondiente a la nota deseada (podemos con- 
sultar los valores de las frecuencias en la tabla de la figura 2.4). Una vez 
determinado el valor de T podemos calcular los 4 bits más significativos 
mediante la fórmula: 


BS = T/256 
Los 8 bits menos significativos se obtienen con la fórmula: 
BM = T MODE 256 


El valor de BS puede estar comprendido entre 0 y 15, ya que los valo- 
res superiores contienen más de cuatro bits, mientras que el valor de BM 
puede variar entre 0 y 255. Los valores más pequeños producen tonos más 
agudos, mientras que si aumentamos los valores los tonos se irán hacien- 
do más graves. 

Recordemos ahora que el valor de BM debe almacenarse en los regis- 
tros 0, 2 Ó 4 y el de BS en los impares (1, 3 ó 5). 

Para seleccionar el canal de salida tenemos que introducir en el regis- 
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tro 7 un número en notación binaria o su decimal correspondiente. La se- 
lección del canal se realiza colocando un cero en el bit correspondiente 
al canal deseado, teniendo en cuenta que, considerando los bits de dere- 
cha a izquierda, el primer bit da salida de tono al canal A, el segundo al B 
y el tercero al C; el cuarto bit da salida de ruido al canal A, el quinto al B 
y el sexto al C. Los dos últimos bits siempre valen 0 y 1 y están al margen 
de la función de salida de sonido. Por ejemplo la instrucción: 


SOUND 7,129 


selecciona el canal A para salida de tono ya que 129=10000001. También 
podríamos introducirlo en notación binaria de la forma: 


SOUND 7,8:B10000001 


En la figura 2.12 podemos ver un esquema de selección del canal de 
salida. 


or | o6 | 05 [bs | 63 [62 [01 [00 | 


Canal A emite tono 
Canal B emite tono 
Canal C emite tono 


Canal A emite ruido 
Canal B emite ruido 


Canal _C emite ruido 


Fig. 2.12. Esquema de selección del canal de salida en MSX. 


El nivel de volumen de los canales A, B y C se ajusta en los registros 
8, 9 y 10 respectivamente. El quinto bit (desde la derecha) de cada regis- 
tro indica si el sonido se ajusta a la envolvente definida con un 1, o si el 
nivel es constante con 0. 

Los primeros cuatro bits determinan el volumen con valores de O (mí- 
nimo) a 15 (máximo). Por ejemplo, la instrucción: 


SOUND 9,26 
ajusta la sonoridad del canal B a la envolvente y volumen 10, ya que 
26=00011010. Recordemos que para la conversión de un número binario 
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a notación decimal debemos seguir el esquema representado en la figura 
2D 


27 =128 = 25=32 2=16 2=8 2=4  21=2  2%=1 
16 +8 +2 = 26 
SONORIDAD VOLUMEN: 10 
SEGUN 
ENVOLVENTE 


Fig. 2.13. Esquema de conversión binario-decimal para la selección de la intensi- 
dad sonora en MSX. 


El período de la envolvente indica la relación tiempo-intensidad sono- 
ra. Se indica en los registros 11 y 12 con valores comprendidos entre 0 y 
255 en cada registro. Estos valores se obtienen con las fórmulas: 


PT = 1789772.5*T/256 
BT = PT/256 (8 bits más significativos) 
BM = PT MODE 256 (8 bits menos significativos) 


El valor obtenido en BT se carga en el registro 11 y el de BM en el re- 
gistro 12. 

Finalmente, el registro 13 nos permite seleccionar la forma de la onda 
sonora a la que queremos ajustar nuestro sonido. Podemos introducir un 
número entre 0 y 15 para seleccionar cualquiera de los ocho tipos de onda 
existentes, tal y como muestra la figura 2.14. 

Para terminar, el programa 2.14 produce un interesante sonido de cam- 
panas. 


Ñ 
MH 
MN 


ll | 


= O REMOS 
= 20 REM * SONIDO DE CAMPANAS. * 
== 30 REM — NE 4 
A 


= 50 CLSiPRINT- AP PIEAMPONAS" 
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Programa 2.14. 


El bucle FOR-NEXT de las líneas 60-90 se encarga de leer los valores 
a introducir en cada registro, que están almacenados en líneas DATA, y a 
continuación los carga con la instrucción SOUND. 


0,1,2,3y9 


4,5,6,7 y 15 


Fig. 2.14. Tipos de envolventes en MSX. 
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LAS PRIMERAS MELODIAS 3 


ASTA ahora hemos visto cómo podemos generar sonidos 
en distintos ordenadores, e incluso, ya hemos conseguido 
que el ordenador ejecute diversas escalas, naturales y cro- 
máticas, ascendentes y descendentes. 

De modo que ya va siendo hora de pasar a interpretar 
las primeras melodías. Vamos a comenzar por trasladar a 
las instrucciones BASIC vistas una serie de melodías has- 
ta cierto punto sencillas. Bien es verdad que la melodía 
ZA más sencilla que podemos encontrar es aquella en la que 
la duración de todas sus notas es la misma, siendo el tono la única carac- 
terística variable. Desde luego este tipo de melodías son bastante escasas 
y siempre suelen resultar algo «sosas». En cualquier caso nosotros ya con- 
tamos con suficientes conocimientos para permitirnos programar melo- 
días con, al menos, dos parámetros variables: tono y duración. 

El método a seguir es el mismo en todos los ordenadores. Almacena- 
remos en líneas DATA toda la información referente a cada nota, en prin- 
cipio tono y duración, y la melodía se ejecuta mediante un bucle que lee 
dicha información e interpreta cada nota con la instrucción de sonido ade- 
cuada. De todos modos vamos a dividir el capítulo de igual forma que el 
anterior para ir viendo diferentes ejemplos en distintos ordenadores de 
una forma cómoda y clara. 


Jl 


LAS MELODIAS DEL SPECTRUM 


Ya sabemos que en el SPECTRUM el tono y la duración constituyen la 
máxima información posible que podemos establecer para la generación 
de sonido, por tanto, lo único que puede variar es el grado de complejidad 
de una melodía en sí misma. 


43 


Vamos a comenzar por estudiar el conocido villancico del programa 
sde 


ur 


A a e ce 
O JU 5d, UA SU, a 6 JU O O O A AS 


ISTTITMEIAA)STNTITMNECEAO—7) 
a a a 


A A O A A A 
A A A O SM A 


JaTa a 2 0 a SU, A <a y O A e A A A A 
MIA 11D po ao pd gp po gl ga 


O O CS O A — CN O — A CU VS — A == 
0 O O A A A A II O A O 
A A o e. 


E A y SE 
A A A e 
A A mm 
O DATA AAA Br Do o 
IA A AA A 


A A y ESA AAA 
¡0 DATA 1,1110 .27 2940 :21010) 29410. y- 


Programa 3.1. 


En este programa hemos utilizado un truco que resulta bastante cómo- 
do si no queremos estar manejando frecuencias continuamente. Si nos fi- 
jamos, toda la melodía se interpreta únicamente con ocho tonos distintos 
(una octava de RE a RE). Lo que hacemos es asignar a estas ocho notas 
ocho números consecutivos, pero debe quedar claro que este sistema de 
numeración lo elegimos arbitrariamente y no tiene ninguna relación con 
el tono de cada nota. La figura 3.1 aclara este punto. 
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Frecuencia 


N.? Asignado 


Fig. 3.1. Relación entre frecuencia, nota y número asignado en el villancico «Ades- 
te Fideles» (SPECTRUM). 


De este modo podemos crear dos matrices de ocho elementos cada una 
(línea 70). La matriz numérica almacena las frecuencias de cada una de 
las ocho notas, mientras que la matriz alfanumérica almacena los nombres 
de dichas notas. Para ello sólo es necesario realizar una única lectura de 
cada uno de estos datos almacenados en las líneas DATA 110 y 120. La lec- 
tura se realiza con el bucle FOR-NEXT de las líneas 80-100 que se repite 
ocho veces, cargando simultáneamente las dos matrices. Ahora ya pode- 
mos olvidarnos de las frecuencias y los nombres de las notas. En las líneas 
DATA de la 180 a la 270 sólo almacenamos la duración de cada nota y el 
número que le hemos asignado. El bucle FOR-NEXT de las líneas 130-170 
se encarga de leer estos datos 61 veces, ya que la melodía se compone de 
61 notas. Cada vez que se ejecuta el bucle se imprime en pantalla el nom- 
bre de la nota que va a sonar (línea 150) y se genera el sonido adecuado 
(línea 160). 

Veamos ahora otro ejemplo un poco más complicado. Vamos a trasla- 
dar la partitura de la figura 3.2 a un programa BASIC en el SPECTRUM. 

Podemos observar que en esta conocida melodía hay un tema princi- 
pal que se repite varias veces, incluso en distintas octavas, por lo tanto no 
es necesario trasladar a líneas DATA todas y cada una de las notas, sino 
sólo el tema principal y las partes de la melodía que se salgan de este tema. 
Luego bastará con mandar el puntero de datos a la línea DATA adecuada 
mediante la instrucción RESTORE y conseguiremos escuchar la melodía 
completa utilizando una serie de bucles FOR-NEXT. Todo esto está de- 
sarrollado en el programa 3.2. 


En este caso hemos elegido la escala que va de SOL (frecuencia -5) a 
FA (frecuencia 5) y hemos numerado las notas de 1 a 7. El primer bucle 
FOR-NEXT (líneas 80-100) se utiliza para leer las frecuencias y los nom- 
bres de estas siete notas y almacenarlos en las matrices correspondientes. 
El siguiente bucle (líneas 130-150) interpreta los siete primeros compases 
de la partitura. A continuación se repite de nuevo el tema principal por lo 
que mandamos el puntero de datos a la primera línea DATA con la instruc- 
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FRANZ LISZT 


(Fragmento) 


(1811 - 1886) 


Moderato 


Fig. 3.2. Partitura del tema «Sueño de Amor», de Liszt. 
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10 REM Ar II II A II AA 
20 REM * SUEÑO DE AMOR (LISZT) * 
30 REM * SPECTRUM * 
LO REM IX RRA 
50 PRINT-AT 8,91"SUERO- DE AMOR" 
60 PRINT AT 11,103"FRANZ LISZT" 
70 DIM E(7),DIM N+(7,3) 
80-FOR-I=1-T0-7 

FO READ-FCIANECD 

100 NEXT 1 

110 DATA -5,"S0L",-3,"LA",-1,"SI" 
120 DATA 0,“D0",2,"RE",4,"MI",5, "FA" 
130 FOR-I=1 TO 18 

140 GOSUB 500 

150 NEXT 1 

160 RESTORE 600 

170-FOR-I=1-TO0-9 

190 GOSUB- 500 

190 NEXT 1 

200 PRINT AT 11,15:N+$(2) :BEEP 1,9 
210 RESTORE 420 
220-FOR-1=1-T0-15 

230 GOSUB- 500 

240 NEXT 1 

250 RESTORE 640 

260 FOR-I=1-T05 

270-READ-P3,D0,F 

290-PRINT-AT-1S ISP" 

290 BEEP D,F 

300 NEXT 1 

310 -RESTORE 600 

320 for I=1 TO-18 

330 READ D,N 

340 PRINT AT 15,15;N$(N) 

350 BEER Fm 12 

360 NEXT-1 

370 RESTORE 420 

390 FOR I=1 10 7 

390 READ DN 

400 PRINT-AT-15,15¿NT 00) 

410 BEER DF (N)+2 

420 NEXT 1 

430 RESTORE £20 

240-FOR—I=1-T0 7? 

450 GOSUE-500 

460 NEXT 1 

470 60 70 9000 

500 READ B,N 

SIOPRINT-AT-15, 155 00D 


2 Y — LL O FU A ELA 6 $ AS 
MA Oy 


a 
ARA A A 


Programa 3.2. 


ción RESTORE de la línea 160. Este esquema de ir seleccionando la línea 
DATA adecuada se repite a lo largo de todo el programa. 


LAS MELODIAS DEL AMSTRAD 


Recordemos que el AMSTRAD puede utilizar hasta tres canales de so- 
nido simultáneamente, pudiéndose definir para cada uno hasta siete pará- 
metros de sonido. Sin embargo, para comenzar con las primeras interpre- 
taciones musicales vamos a utilizar un único canal, el A, y sólo vamos a 
variar dos parámetros: el tono y la duración. En capítulos posteriores al- 
canzaremos mayor complejidad al utilizar todos los parámetros y varios ca- 
nales de sonido simultáneamente. 

Vamos a comenzar por uno de esos raros ejemplos en el que todas las 
notas que componen la melodía (excepto tres) tienen la misma duración. 
El programa 3.3 interpreta en el AMSTRAD el popular «Romance Anóni- 


SAMAMAE CANMMANIT 1 
MANCE A 
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SS LOCATE 20-16 =-PRINT NE?) .. nu 
a 


Y VAS ATES A ALA DST AE AAN MM 
ULATE ZO, IO:3FRiNI NEC) 


CO PRTNT NEO)... 
A o O a O dd E A 


Programa 3.3. 


La melodía se compone combinando 13 tonos diferentes, que están al- 
macenados, junto con los nombres de las notas correspondientes, en las 
líneas DATA de la 110 a la 130. Estas trece parejas de datos las almacena- 
mos en dos matrices, una de tonos y otra de nombres de notas de modo 
que el primer elemento de ambas matrices (el 0) corresponde a la nota 
más grave (el DO, tono 239), mientras que el último elemento de la matriz 
(el 12) corresponde a la nota más aguda (el RE, tono 106), tal y como mues- 
tra la figura 3.3. 
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Fig. 3.3. Relación entre tono, nota y elemento de la matriz en el tema «Romance 
Anónimo» (AMSTRAD). 


Ambas matrices se cargan con el bucle FOR-NEXT de las líneas 80-100. 
Seguidamente la melodía se divide en dos partes. La primera se interpreta 
con el bucle de las líneas 140-160 y la segunda con el bucle de las líneas 
250-270. 

El funcionamiento de ambos bucles es el mismo. Cada vez que dan una 
vuelta, el control del programa se transfiere a la subrutina 390 donde se 
realiza la lectura de la nota que va a sonar (línea 390), representada en las 
líneas DATA por su posición en las matrices. A continuación se imprime 
el nombre de la nota en la pantalla (línea 400) y seguidamente se produce 
el sonido (línea 410). El volumen se ha ajustado al máximo (15) y la dura- 
ción se ha establecido en 40 centésimas. 

Finalmente encontramos una novedad en la línea 420 (que también se 
repite en otras líneas a lo largo del programa). Un bucle WHILE-WEND 
que utiliza una función SO, hasta ahora desconocida. Veamos su misión. 

El AMSTRAD tiene la capacidad de generar «colas» de sonido, es decir, 
se pueden almacenar varios sonidos en una memoria intermedia y se irán 
ejecutando a medida que llega su turno, sin detener la ejecución del pro- 
grama. La función SQ tiene por objeto informar de la situación de la cola 
de sonido del canal especificado. SQ tiene siempre el formato: 


SQ (canal) 
donde canal será 1 para el canal A, 2 para el B y 4 para el C. 


La función SQ produce un número que se interpreta, según sea el va- 
lor de los bits, de la forma siguiente: 


Bits 0, 1 y 2: número de huecos libres en la cola. 

Bits 3, 4 y 5: estado de sincronización de la primera nota de la cola. 
Bit 6: la primera nota está retenida en la cola. 

Bit 8: el canal está activo. 


Por lo tanto una línea de tipo: 
WHILE SQ(1) > 128 : WEND 
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como las que aparecen en el programa 3.3, tiene por objeto generar una 
pequeña pausa entre una nota y la siguiente de modo que éstas no se acu- 
mulan en la cola de sonido. De este modo la interpretación de la melodía 
y la ejecución del programa van a la par. 

Si no estableciéramos estas pausas en el programa 3.3, las notas que se 
imprimen en pantalla irían a mayor velocidad que la melodía por lo que 
no habría una correspondencia. Además el mensaje «Ready» que indica el 
final de la ejecución del programa aparecería mucho antes de que finali- 
zara la melodía ya que ésta estaría almacenada en la «cola» de sonido. 

A continuación vamos a trasladar al AMSTRAD la partitura representa- 
da en la figura 3.4. 

En esta melodía aumenta un poco el nivel de complejidad ya que la du- 
ración de las notas es variable. Lo que hacemos en el programa 3.4 es al- 
macenar en líneas DATA parejas de números, correspondientes al tono y 
la duración de cada nota. Para la interpretación de la pieza la dividimos 
en tres partes ya que hay unos cuantos compases que se repiten (del 10 
al 14). 

Estas tres partes se hacen corresponder con tres bucles FOR-NEXT que 
interpretan respectivamente la primera parte, el tema que se repite, y la 
parte final. El esquema para interpretar cada nota es prácticamente el mis- 
mo que en el programa anterior: una subrutina (línea 200) que realiza la 
lectura de los datos, genera el sonido y produce una pausa con un bucle 
WHILE-WEND y la función SO. 


LL 


LAS MELODIAS DEL IBM 


Como ya sabemos el IBM puede interpretar melodías con dos instruc- 
ciones diferentes: SOUND y PLAY. En este capítulo vamos a ver dos ejem- 
plos, cada uno con una instrucción, de las posibilidades musicales del IBM. 

Recordemos que SOUND tiene únicamente dos parámetros, al igual 
que el BEEP del SPECTRUM, por tanto, podemos observar que el desarro- 
llo del programa 3.5 es muy similar a los programas vistos anteriormente 
para el SPECTRUM (programas 3.1 y 3.2). 

Por otra parte la instrucción PLAY nos permite interpretar cadenas de 
mandatos musicales lo que da lugar a programas más cortos. En la figura 
3.5 podemos ver la partitura de un fragmento del conocido «Vals de las 
Olas». 

Al igual que en ejemplos anteriores hay un tema que se repite. En este 
caso dicho tema lo vamos a asignar a la variable T$ de modo que cada vez 
que haya que interpretarlo no tendremos que llamar a dicha variable des- 
de la instrucción PLAY correspondiente. El resto de la melodía lo tradu- 
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IL 


(Fragmento) 


Lento 


Fig. 3.4. Partitura del tema «Tristeza», de Chopin. 


F. CHOPIN 
(1810-1849) 


O E AA 
20 REM * TRISTEZA (CHOPIN) + 


30 REM +* AMSTRAD: * 
40 REM Hr III 
A, 


60 LOCATE 17,10:PRINT "TRISTEZA" 

70 LOCATE 13,13:PRINT "FEDERICO CHOPIN" 

80 FOR I=1 TO 39 

90 GOSUE 200 

100 NEXT 

110 RESTORE 

120 FOR I=1 TO 23 

130 GOSUB 200 

140 NEXT 

T50-—RESTORE=320 = 

150 FOR-1=1-T0-51 

170 GOSUE 200 

180 NEXT 

190 END 

200 READ T,D 

2595 HONEAE EA 

¿20 WHILE SO(1)>128:WEND - 

230 RETURN === 
240 DATA 239,80,179,80, 190, M0, =%, 0, 159, 200 
250 DATA 142,40,142,40,1579,40, 142,200 

260 DATA 134,40,134,40, 142,40,106, 120,119,40 
270 DATA 134,40, 142,40, 190,40,179,40,159,200— 
280 DATA 142,40,142,40,159,40,179, 160 == == 
290 DATA 142,40,134,40,159, "40 142,40, 134, 40. 

295 DATA 119,40, 142,40, 134,40 = : 

300 DATA 106,80,159,160,142,40,159,40 == 
310 DATA 159,80,142,40,159,40,119,80 RRA 
320 DATA 119,40,106,40,106,40,119,40,134,40 

323 DATA 119,40,142,40,134,40 

330 DATA 95,40,899,40,99,40,95,40, 105,40,75 - 
335 DATA 40, 113, 40,106,40 == 
340 DATA 89, 20 ¿80 ,40 95, 40 189,40, 80, 40, 71 

345 DATA 40,89, 40 180,40 : == - 
350 DATA 71,200,80,40,97, 40,106, A == 
360 DATA 95,160,089, 40,75,40,106,40, 142,40. == 
370 DATA 119,160,106, 40, 119,40, 134; 40,179, 40. A 
380 DATA 142,200, 139 40, 1792 140,225, 40. — === 
390 DATA 142,200,139,40,179,40,223,40 == - 
400 DATA 142,520,159,40,179,40,239,40,179, 160 


Programa 3.4. 


cimos a mandatos musicales de PLAY vigilando sobre todo las octavas que 
corresponden y las duraciones de las notas. (Recordemos que L4 es una 
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L,440,L4,493.88,5] 
SE q E A La a 


Programa 3.5. 


negra y L1 es una redonda o, como en este caso, una blanca con puntillo 
ligada a una negra). Todo esto está recogido en el programa 3.6. 


LAS MELODIAS DEL COMMODORE 


Finalmente vamos a ver cómo programar bonitas melodías en el COM- 
MODORE que, aunque no dispone de comandos de sonido, es tan fácil y 
espectacular como en los demás ordenadores. 

Vamos a comenzar por el programa 3.7 que reproduce un fragmento 
del conocido «Minueto», de Beethoven. 
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JUVENTINO ROSAS 


Vals 


de Rosas. 


, 


«Vals de las Olas» 


Fig. 3.5. Partitura del 


| 
J 
: 
3 
Ñ 
¿ 
Y 


| 


Programa 3.6. 


DI) 


ZA EN T1eS427?2 T1N $429 
2 A A hd A A A 


A cert ada 


E ma Y pe , MO, lo | ir o SA, 
2 HITA ¿445,210 %:9%00M1110010:1500:f11N%: 0 


Programa 3.7. 


Veamos detenidamente el funcionamiento del programa. El primer bu- 
cle FOR-NEXT (líneas 80-100) se encarga, como ya hemos dicho en el ca- 
pítulo anterior, de poner a cero todos los registros de sonido. A continua- 
ción se dimensionan dos matrices numéricas de ocho elementos cada una 
(línea 110) que tienen por objeto almacenar los datos sobre altas y bajas 
frecuencias de las ocho notas utilizadas a lo largo de la melodía. Además 
también establecemos el tempo de la melodía que determinará su veloci- 
dad de interpretación. 

El bucle de las líneas 120-140 carga las dos matrices con los datos al- 
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macenados en las líneas DATA 150 y 160. A continuación ajustamos el vo- 
lúmen al máximo (línea 170) y definimos el nivel de ataque-caída y soste- 
nimiento-relajación (línea 180). La interpretación de la melodía se realiza 
con el bucle FOR-NEXT de las líneas 190-260, dentro del cual se ajusta la 
forma de la onda (línea 200), se leen los datos correspondientes a la dura- 
ción y nota (línea 210) y se introducen los valores adecuados de alta y baja 
frecuencia en los registros correspondientes del canal A (líneas 220 y 230). 
Finalmente en las líneas DATA se almacenan parejas de datos que definen 
la duración y la nota. 

El programa 3.8 es otro ejemplo de las posibilidades sonoras del COM- 
MODORE. En este caso interpreta la famosa «Canción de Cuna» de 
Brahms. 


SA Ga 1514 
AI 


AA 2 
FA DATA 22,227 23:111, 20) 21%. 54,14) 
A 


Programa 3.8. 


El esquema del programa es el mismo que en el ejemplo anterior. En 
este caso hemos establecido una variable SID=54272 para identificar el pri- 
mer registro de sonido. Los demás registros están establecidos en función 
de esta variable SID (por ejemplo, SID + 24 = 54296, registro del volumen). 
La otra novedad que encontramos en el programa es que aquí no hay un 
bucle FOR-NEXT para interpretar la melodía sino que al final de los DATA 
establecemos un dato ficticio, -1, que indica el final de la melodía, de 
modo que cuando se produce la lectura de ese dato, mediante la condi- 
ción adecuada finaliza la ejecución del programa. 


ul 
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MUSICA, MAESTRO 4 


OR fin ha llegado el momento de utilizar el ordenador 
para interpretaciones más sofisticadas. Vamos a dedicar 
el presente capítulo al desarrollo de un tema musical com- 
pleto en el SPECTRUM, para pasar a continuación al tema 
estrella del sonido con ordenador: la interpretación de 
melodías con varias voces utilizando simultáneamente va- 
rios canales de sonido. Finalmente veremos un interesan- 
te programa musical para IBM que nos permite seleccio- 
nar la melodía que queremos escuchar. 


EL SPECTRUM Y BEETHOVEN 


Si Beethoven levantara la cabeza... quedaría totalmente perplejo al 
comprobar que un «aparatito» como el SPECTRUM es capaz de interpre- 
tar su célebre obra «Para Elisa» completa, desde la primera hasta la últi- 
ma nota, y sin equivocarse. 

El programa 4.1 hace posible este «milagro» de la técnica. 


SRTNT-AT 90 11t-UEBARA ELISA" 
o O A A e e A 


GEETHEVEN" 
2 PRINT AT 13.11:"BEETHEV 


60 


40 NEXT 
50 DATA 
60 DATA 
70 DATA 
80 DATA 
90 DATA 
100 DATA 
110 DATA 
120 DATA 
130 DATA 
140 DATA 
1530 DATA 
160 DATA 
170 DATA 
180 DATA 
190 DATA 
200 DATA 


1 

255255 

E AAA AA 21552213 
HH 
ii 

A A 
PARA E 5 2, 13 
AAA 

O > 2113, 2112 

.6,10 

RT 
ERRE E 
aaa 
A Ei 
.6,12,.2,5,.6,17 

AE 

IAEA 


210 RESTORE 50 


220 FOR 


=1 TO 35 


230 READ a,b 
240 BEEP a,b 


250 NEXT 


i 


260 RESTORE 310 


270 FOR 1 
280 READ 


=1 TO 102 
a,b 


290 BEEP ayb 


300 NEXT 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 

«1512; 
400 DATA 

ns 
410 DATA 

12, 
420 DATA 

.1,18, 
430 DATA 

EE 
440 DATA 
450 DATA 
460 DATA 


0. a 
A E 

RSE 
iaa 
¡5524555455808 1H 
A AS 

EEE TO 
ca 
=P 
5201120711120 
1472520525242 5205 
A 

== A AAA 
¿520% 20% 38520 

A A A A A A A E 
XA 

A AER 
¿ib Aoc 

A A A A 
iS 

PATA EE 


470 RESTORE 60 


480 FOR i 


=1 TO 36 


490 READ a,b 

500 BEEP a,b 

510 NEXT á 

520 RESTORE 50 

530 FOR i=1 TO 34 

540 READ a,b 

550 BEEP a,b 

560 NEXT i 

570 RESTORE 620 

580 FOR i=1 TO 77 

590 READ a,b 

£00 BEEP a,b 

610 NEXT i 

620 -DATA-1,2,10,1:2,14 

630 DATA .8,15,.2,17,.2,18 

640 DATA .8,18,.4,18 

650 DATA 1.2,17 

660-DATA—.8,13,.2,13,.2,12 

670 DATA .8,10,.4,10 

£80 DATA .4,10,.4,13,.4,12 

690. DATA 1.2,10,1.2,14 

700 DATA .8,15,.2,17,.2,18 

710 DATA .8,18,+.4,18 

720 DATA 1.2,18 

730 DATA .8,16,.2,15,.2,13 

740 DATA .8,11,.4,10 

750 DATA .8,9,.4,9 

760 DATA 1.2,10,1.2,12 

770 DATA .1393,-2,.133,1,.133,5,.133,10,.133, 
13,.133,17,.133,15,.133,13,.133,12 

AA 
25.183,29, 19312711331251133124 

790 DATA .133,22,.133,25,.133,29,.133,34,.133, 
37,.133,41,.133,39,.133,37,.133,36 

800 DATA .133,35,.133,34,.133,33,.133,32,.133, 
315133,230133529%1323,28: 133527 

810 DATA .133,26,.133,25,.133,24,.133,23,.133, 
22,.133,21,.133,20,.133,19,.133,18 

820 RESTORE 60 

830 FOR i=1 TO 56 

840 READ a,b 

850 BEEP a,b 

860 NEXT i 

870 RESTORE 50 

880 FOR i=1 TO 35 

890 READ a,b 

900 BEEP a,b 

910 NEXT i 


Programa 4.1. 
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Si nos fijamos podemos observar que el esquema utilizado para la rea- 
lización del programa es similar al seguido en los programas del capítulo 
anterior. En líneas DATA se han almacenado parejas de datos que indican 
la duración y frecuencia de cada nota. El primero (líneas 50 a 200) corres- 
ponde al tema principal, y más conocido de la obra. El segundo grupo (lí- 
neas 310 a 460) corresponde a lo que sería el segundo tiempo, tras el cual 
vuelve a interpretarse el tema principal. Finalmente, el tercer grupo (lí- 
neas 620 a 810) está asociado al tercer tiempo, concluyendo definitivamen- 
te la obra con la interpretación por tercera vez del tema principal. 

La interpretación se realiza con una serie de bucles FOR-NEXT que 
leen cada pareja de datos de las líneas DATA y ejecutan la nota correspon- 
diente. El bucle de las líneas 270-800 es el encargado de interpretar el se- 
gundo tiempo, mientras que el de las líneas 580-610 ejecuta el tercer tiem- 
po. El resto de los bucles interpretan el tema principal todas las veces que 
es necesario, mandando el puntero de datos mediante la instrucción RES- 
TORE a la línea DATA adecuada. 

Bueno, la idea no es nada complicada, sólo es necesario un poco de pa- 
ciencia para ir traduciendo cada nota de la partitura a una pareja de núme- 
OS. 


ES 


CONCIERTO A DOS VOCES PARA AMSTRAD 


Aunque hasta ahora sólo hemos utilizado el canal A del AMSTRAD para 
nuestras experiencias musicales, sabemos que podemos utilizar simultá- 
neamente hasta tres canales de sonido. 

Por tanto, el primer parámetro de la instrucción SOUND no tiene como 
único objeto la mera selección de uno de los tres canales, sino que tam- 
bién le indica el ordenador si deben sonar varios canales al unísono o se- 
paradamente, si debe retener el sonido de un determinado canal o si debe 
borrar una cola de sonidos de alguno de los canales. La figura 4.1 muestra 
una tabla con los valores que toma el primer parámetro de SOUND depen- 
diendo del efecto deseado. 

Sin embargo, en el capítulo 2 dijimos que este primer parámetro podía 
tomar cualquier valor comprendido entre 1 y 255, lo que significa que po- 
demos sumar varios de los valores representados en la tabla, consiguien- 
do de este modo combinar varios efectos. Por ejemplo, si queremos en- 
viar un sonido al canal A sincronizándolo con el B el parámetro será 17 
ya que: 


1 (seleccionar canal A) + 16 (sincronizar con canal B) = 17 


Por otra parte, si utilizamos el parámetro 64 produciremos la retención 


62 


Canal(es) Efecto 


Seleccionar canal A 


Seleccionar canal B 


Seleccionar canal C 


Sincronizar con canal A 


Sincronizar con canal B 


Sincronizar con canal C 


Retener sonido 


Borrar cola de sonidos 


Fig. 4.1. Valores para la selección de canales en AMSTRAD. 


de una cola de sonido. Para anular esta retención disponemos de la instruc- 
ción: 
RELEASE C 


donde C es un parámetro comprendido entre 1 y 7 que indica el canal o 
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canales que deben liberarse. Por ejemplo la orden RELEASE 5 liberaría 
las colas de sonido retenidas en los canales A(1) y C(4). 

Siguiendo con los parámetros de SOUND, habíamos dejado sin estudiar 
los tres últimos. Vamos a ver en este capítulo los correspondientes a la en- 
volvente de volumen y la envolvente de tono. 


Jl 


== La envolvente de volumen 


Para definir una envolvente de volumen utilizaremos la instrucción 
ENV que tiene el siguiente formato: 


ENV N, El, Al, DI, E2, A2, D2, E3, A3, D3, E4, A4, D4, ES, AS, D5 


donde N es el número de la envolvente definida, comprendido entre 1 y 
15, y que será el número de referencia que citaremos más adelante como 
quinto parámetro de la instrucción SOUND correspondiente. Los quince 
parámetros restantes se pueden agrupar en realidad en tres que son los que 
constituyen una sección de la envolvente, lo que significa que cada envol- 
vente puede disponer de hasta cinco secciones. El parámetro En indica el 
número de escalones de la sección correspondiente, es decir, en cuántas 
etapas de volumen queremos que evolucione la "nota antes de concluir. 
Está comprendido entre 0 y 127. 

An define la altura de cada escalón, de modo que el nivel de volumen 
de un escalón puede variar respecto al anterior en un número de unida- 
des comprendido entre 0 y 15 (positivo o negativo). Sin embargo, los pa- 
rámetros admisibles van de -128 a +127. 

Finalmente, Dn especifica la duración de cada escalón en centésimas 
de segundo. El margen de valores va desde O a 255 lo que significa que la 
duración máxima de cada escalón es de 2.56 segundos. 

Por consiguiente, es lógico que la duración total de la envolvente de vo- 
lumen no sobrepase el valor especificado en el parámetro duración de la 
instrucción SOUND correspondiente, ya que en este caso el sonido termi- 
naría antes de completar todos los escalones de la envolvente. Si por el 
contrario, la duración de la envolvente es más corta que el parámetro du- 
ración, la nota continuará sonando, aunque haya finalizado la envolvente, 
al nivel del último escalón. 

El programa 4.2 es un ejemplo práctico de sonido con envolvente de 
volumen definida con cinco secciones. 

El sonido producido está controlado por la instrucción ENV. En la ins- 
trucción SOUND hemos definido el canal A(1) y el tono (478). Sin embar- 
go, la duración especificada es 0, lo que indica a la máquina que la dura- 
ción de la nota es la definida en ENV. También se ha dado valor 0 al vo- 
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Programa 4.2. 


lumen ya que está especificado con más detalle en ENV. El quinto pará- 
metro de SOUND es 1 que indica la envolvente que debe utilizar. 


En la figura 4.2 podemos analizar la forma de la envolvente de volu- 
men definida en el programa 4.2. 


Sección 1 

Sección 2 

Ñ Sección 3 
Sección 4 
Sección 5 


segundos 1 2 3 


Fig. 4.2. Envolvente de volumen definida en el programa 4.2. 


La envolvente de la figura 4.2 dura 5 segundos. En efecto, si multipli- 
camos el número de escalones por la duración de cada uno de ellos y su- 
mamos los resultados para las cinco secciones obtenemos: 


(3*10) + (20*5) + (20*1) + (10*5) + (30*10) = 500 centésimas 
= 5 segundos 
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Si queremos cancelar el efecto de una envolvente en la instrucción 
SOUND, debemos redefinirla sin especificar las secciones. Por ejemplo 
ENV]1 desactiva la envolvente 1. 

El programa 4.3 nos permite experimentar con distintas envolventes de 
volumen, incluyendo sólo una sección. 


: 10 REM. AI III 
== === 207 SS * ENVOLVENTES DIE VOLUMEN + 
AAA -30. REM AMSTRAD. * 


= === 40 REM. PONIAN 
==55555=— 


60 INPUT "NUMERO DE SALTOS. "¿NS 

70 INPUT "AMPLITUD DEL SALTO "¿AS 

-80 INPUT “DURACION DEL SALTO “;DS - 

>>> EE 

100 PRINT "NUMERO" ,"AMPLITUD","DURACION" 
110 PRINT NS,AS,DS : 

120 ENV 1,NS,AS,DS 

130 SOUND 1,240,0,15,1,0,0 


Programa 4.3. 


== La envolvente de tono 


Para definir una envolvente de tono utilizamos la instrucción ENT, con 
el siguiente formato: 


ENT N, El, Al, DI, E2, A2, D2, E3, A3, D3, E4, A4, DA4, ES, AS, DS 


donde N es el número de la envolvente, que puede tomar cualquier valor 
entre 1 y 15, lo que significa que, al igual que con las envolventes de vo- 
lumen, podemos llegar a definir hasta 15 envolventes diferentes. El pará- 
metro N es el mismo que especificaremos en la instrucción SOUND corres- 
pondiente en sexta posición. 

El resto de los parámetros de ENT siguen el mismo esquema que en 
ENV, es decir, se pueden definir entre una y cinco secciones para cada en- 
volvente, cada una de las cuales consta de tres parámetros: En, que es el 
número de escalones, An, que es la altura de cada escalón, y Dn, que es la 
duración de cada escalón. Los márgenes de los valores son los mismos que 
para ENV excepto para En que va de 0 a 239, 

Al igual que ocurre con ENV es necesario definir al menos una sección 
y siempre cada sección debe contar con todos los parámetros. 
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El programa 4.4 es un ejemplo del efecto de una envolvente de tono de- 
finida con cuatro secciones. 


10 REM 4 III IA 
20 REM * EJEMPLO DE ENT + 


30 REM * AMSTRAD * 
40 REM IR III MM RI A 
SO-5E7 


60 LOCATE 13,13:PRINT "EJEMPLO DE ENT" 
70 ENT 1,65,5,1,10,-2,10,10,2,5,30,-5,1 
80 SOUND 1,478,50,15,0,1,0 


Programa 4.4. 


La figura 4.3 describe de modo esquemático el funcionamiento de ENT 
y SOUND en el programa 4.4. 


Número de la envolvente 
Número de escalones 
Tamaño de cada escalón 
Duración de cada escalón 


. 
. 
. 
. 
. 
. 
. 


10,2,5,  30,-5,1, : Noutilizada 


ENT 1, 65,5,1, : 10,-2,10, 
. " a e en este 
: : : : + ejemplo 
Sección 1 ; Sección 2 : Sección 3 ; Sección 4 : Sección 5 
SOUND 1, 478, 50, 15, O, il (0) 


Ruido 


ENT 
ENV 
Volumen 
Duración 


Tono 


Número de canal 


Fig. 4.3. Relación entre las instrucciones ENT y SOUND y secciones de ENT. 
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Lógicamente, si ENV representaba la variación del volúmen de una 
nota con el tiempo, ENT se encarga de definir la variación del tono de una 
nota a lo largo del tiempo. Esto está relacionado con las fases de ataque, 
caída, sostenimiento y relajación que vimos en el capítulo 2 cuando habla- 
mos de los sonidos en el COMMODORE. 

Finalmente, el programa 4.5 nos permite experimentar con distintas en- 
volventes de tono con una sola sección. 


-60 INPUT "NUMERO - DE SALTOS "¿NS 


110 PRINT. ERE : 
- 120 ENT 1,NS,AS,DS 
130 SOUND - A AS 


Programa 4.5. 


== El concierto 


Por fin, vamos a basarnos en todos los conceptos vistos anteriormente 
para desarrollar el programa 3.6 que interpreta un bonito concierto a dos 
voces utilizando la sincronización de los canales A y B. Las líneas DATA 
220 y 230 almacenan la información referente a los tonos de las notas que 
componen la melodía en notación hexadecimal, mientras que las líneas 
DTA 240 a 255 almacenan toda la información sobre nota, octava, dura- 
ción y sincronización para agudos y graves. 

Para la interpretación de la melodía se definen dos envolventes de vo- 
lumen, con tres secciones cada una (líneas 140 y 150), y una envolvente 
de tono, también con tres secciones (línea 160). La subrutina 260 es la en- 
cargada de enviar el sonido correspondiente al canal A mientras que la 
subrutina 440 envía el sonido al canal B. 
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10 REM_ ERE E —= 
20 REM * CONCIERTO _B-BOS VBEES - === 

30_REM_* — ——-—- AMSTRAD-— - NA - 
40 REM FAIRANARAAARAAA RAR ARARARAR AAA = 


50 DIM ESCALA(12) === AA 
SEAS = == - - = 
70 READ ESCALATE) - == == 
80 NEXT 

-90 CANAL1I=1 READ C1%,C24,c3$: .CANAL13=C1$+C2$+C3$ 
100 CANAL2=2 ¿READ 043 ,C5$ :CANAL23$=043+C55+ : 

110 CLS:LOCATE 10, 12:PRINT "CONCIERTO A-DOS VOCES" 
120 VELOCIDAN=12 = 

130 ESCALA+=" a-b b cto d-e e tot grg" : 

140 ENV 1,2 E A ! = 
IT =5 16,10 10,15 
160 ENT 1,1,1 A == 3 x i 

170 DEF FN M5 (5$,5) MIDE (S$,5, ¿B=- 

180 CANAL1=1:+GOSUB 500 : : 

190 CANAL2=1:GOSUB 680 = = 
200 1F- CANAL 1+CANAL2 >0 THEN GOTO 200 

EA 

220 DATA 2777, 2.700, e6A7, 2647, ¿L5ED, 2598 

230 DATA 2547 ,%4FC,24B4, "2.470, 431, "23F4 


240 DATA AcratafifigiAl-B2C2H4g291A1-B6A2Crifigifiglal-biA1- 
245 DATA b2C292A292f191a292f6e2c2e2c292e2c1-B1A292f4e4d8c4 


247 DATA +$3f1c2d4-b2fr2-B2A292f6e29r4C04-Bialf1-Big2C2-B44498f . 


250 DATA r4f4f8f4e4c4fr8f4e2f 2e4d2e2d8c8c6e2f494g8e4f3f1c4 
255 DATA dr8g4cr4e4có6f2d4c4c8fr8-e4dr8g8c4e4c6f2d4c4c8f . 


500 REM * ENVIAR SONIDO AL CANAL A * 

510 P1$=FN M$(CANAL1+,CANAL1) == 

520 IF P1$<>"r" THEN R1=0:GOTO 540 

530 Ri=16:CANAL1=CANAL 1+1:P1$=FN M$(CANAL1+$,CANAL1) 
540 1F Pi$="," THEN CANALi=0:RETURN ELSE Li=VAL (P1$) 
550 CANALi=CANALi+1 > 

560 N1$=FN "MS (CANAL 1$ ,CANAL 1) 

570 CANAL1=CANAL1+1 : z 

580 IF Ni$="*" OR Ni$="-" THEN GOTO 650 

590 Nis=" "+N1$ - 

600 =NDI=(1+INSTR (ESCALAS LOMERS (N13)))7/2 

610 IF ASC(RIGHTS(N1$,1))>96 THEN O1=8 ELSE Oi=16 
620 SOUND 1+R1 ESCALA (ND1)/01, VELOCIDAD+*L1,0,1,1 
630 ON SO(1) GOSUB 500 

640 RETURN - = 

650 NI$=NIS+FN. M$ (CANAL 1$,CANAL 1) 

660 CANAL1I=CANAL1+1 - 

670 GOTO 600 

680 REM * ENVIAR SONIDO. AL CANAL Box 

-690 P2$=FN MS(CANAL2$,CANALZ2) 

700 1 P2$<>"r" THEN R2=0: GOTO 720 

710 R2=8:CANAL2=CANAL2+1 :P2$=FN M$(CANAL2$ ,CANAL2) 
720 1F P2%="," THEN CANAL2=0: REFIEN FESE L2=VAL (P2$) 
730 CANAL2=CANAL2+1 

740 N2$=FN M$(CANAL2+, CANAL2> z B 

750 CANAL2=CANAL2+1 = 
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760 IF N2$="+" OR N2$="-" THEN GOTO 830 

770 N2$=" "+N2$ 

780 ND2=(1+INSTR(ESCALAS,LOWERS$(N2$)))/2 

790 IF ASC(RIGHTS(N2$,1))>96 THEN 02=4 ELSE 02=8 
800 SOUND 2+R2,ESCALA(ND2)/02,VELOCIDAD*L2,0,1,2 
810 ON SQ(2) GOSUB 680 

820 RETURN : : 

830 N2$=N2$+FN M$(CANAL2$ ,CANAL2) 

840 CANAL 2=CANAL2+1 

850 GOTO 780 


Programa 4.6. 


-— ELCOMMODORE NAVIDEÑO 


El COMMODORE también es capaz de interpretar melodías utilizando 
varias voces. El programa 4.7 reproduce el popular villancico «Noche de 
Paz» a dos voces, utilizando los dos primeros canales de sonido. El esque- 
ma seguido en este programa es análogo al de los programas para el COM- 
MODORE del capítulo anterior. Toda la información sobre notas y dura- 
ción se almacena en líneas DATA, mientras que los POKE oportunos en 


las direcciones de memoria adecuadas se encargan de interpretar la melo- 
día. 


10 ETA AAA A AAA AR 
20 REM % HOCHE DE PAZ CYILLANCICOS + 
30 REM + COMMODORE * 
$ REM EXEFEFFFEEFA CARA 
SA PRINT CHRSC147) 

648 FRINT SPCC2140:; "NOCHE DE PAZ" 

TA PRINT SPOL213502:"YILLANCICO" 

34 SII=54272 

390 FOR I=SID TO SID+24 

106 POKE 1.0 

1140 NEXT I 

1248 DIM AC107,BL14 

130 FOR I=4 TO 16 

144 READ ACI+.ECI> 

1350 NEXT 1 

166 DIM AALTO.EECPA 

176 FOR I=0 TO 7 

184 READ HACI+,EBCIS 

194 NEXT 1] 

¿664 POKE S1DI+24.13- 

210 POKE SID+6, 244 


ZO 


A A A A o e re De 
e - e ln e 2 Mn de JS Y A Md 


a A. A e e 
LOS o O O nd pu 


NnaTa 143 ya ASAS 
Ll 6 0 0 dl. in PL 3 


4 TIA] o TV — E E — A — “TO O — 
20 DATA 22 2 tit o o ds 


Ata ts 


Programa 4.7. 


ZA 


SELECCION MUSICAL PARA IBM 


Por último, incluimos aquí un espectacular programa que nos permite 
elegir la melodía que deseamos escuchar, sólo con pulsar una tecla. La pre- 
sentación en pantalla resulta muy atrayente ya que aparece el teclado de 
un piano en que se va indicando la nota que suena en cada momento. 


LZ 


A 

20 REM x* SELECCCION DE MELODIAS x* 

30 REM x IBM * 

DO FIEM AXAHAHELEE.L EL ERE RR 

50 SCREEN 0,1 :WIDTH 40:COLOR 1S53,1,1: 
CLS:DEFINT A-Z 

A selec 
ciones --————- > 

70-LOCATE 16.,7:PRINT " A=MARCH —E-HUMOR 
I-SAKURA" 

80 LOCATE 17,7:PRINT " B-STARS  F-BUG 
A 
SO-COCATE187PRINT——E-=FORAY—b-POPp 
KE=SCALES" 

100 LOCATE 19,7:FPRINT " D-HAT H=DIANDY 
ESEC-SALIDIA" 

110 COLOR 15,0 

120 FOR I=0 TO 15:FOR J=0 TO 8 

130 LOCATE S+J3,S+I*2:PRINT-CHR$(219)3 
CHR*$ (221); 

140 NEXT:NEXT 

150 FOR I=0 TO 12:FOR J=0 TO 4 

160 I1F-—I=2-DR-I=6-0R-1=92-D0R-1=13 THEN-180 
170 LOCATE S3+J3,8+1*2:PRINT CHR$(32)3 
CHRE (222); 

180 NEXT:NEXT 

190 FOR J=0 TO 9 

200 LOCATE 4+J,4: COLOR 4,0:PRINT CHR*(221); 
¿LOCATE 4+J,36:COLOR 153,0 

210 PRINT CHR*(221); : COLOR 4,1:PRINT 
CHR$ (221); 

220 NEXT 

230 COLOR 4,1:LOCATE 4,4 

240 FOR 1=0 TO 32:PRINT CHR*(219) , ¿NEXT 
250 PRINT CHR+(221)3:LOCATE 13,4 

260 FOR I=0 TO 32:3PRINT CHR+*(219)3:NEXT 
270 PRINT CHR$(221) 3: COLOR 0,7:DIM M(88), 
070) 

280 FOR-1=7 TO-B8B8:M(D)-=-—36.B*(2"(1/12))" 
(I=6) ¡NEXT 

290-FOR-I=0 TO £6:M(1) = 32767:NEXT 


300-010) =-0 
310 0(39)=5:0(40)=7:0(41)=8:0(42)=9 
320 0(43)=10:0(44)=11:0(43)=13:10(46)=14 
330 0(47)=15:0(48)=16:0(49)=17:0(50)=18 
340 -0(51)=19:0(52)=21:0(53)=22:0(54)=239 
350 -0(355)=24:0(56)=235:0(57)=27:0(58)=28 
360 0(39)=29:01(60)=30 10 (61)=31 :10(62)=32 
370 0(63)=33:0(64)=35:0(65)=36:0(66)=37 
390 -0(67)=38:0(68)=39:0(69)=40:0(70)=42 
390 60T0-530 
400 READ J,k 
410 CMODF = INKEY+: IF CMDF="" THEN 430 
420 IF CMD+=CHR+(27) THEN RETURN 
430 1F£ J]= -1 THEN RETURN 
440 Q = 0(J) 
4350 IF 3:64 OR J%239 THEN 480 
450 1F-SEREEN (550392 THEN-COLOR- 0,72 
LOCATE 11,0:PRINT CHR*(14)3:COLOR 15,0: 
GOTO 480 
470 COLOR 15S,0:LOCATE 7,Q:PRINT CHR*+(14) 
S:COLOR-0>,7 
480 SOUND MC) ,K:1F-J=0- AND K=1 THEN 500 
490 SOUND-32767,1 
500-—1F-— 37564 -0R- 3239 THEN 400 
510 IF SCREEN(3,0) = 32 THEN COLOR 15,0: 
LOCATE 7,B:PRINT-CHR+$(32)5:60T0- 400 
20 COLOR 15,0O:LOCATE 11 ,0:PRINT 
CHREC219)3:G0TO 400 
330 LOCATE 21,S:PRINT ” 

, 
540 LOCATE-21,5:PRINT-—"SELECCION DE 
MELODIA==>">3 
A AA AA 
560 CMOS=INKEYE: IF CMDF="" THEN 560 
370 IF CMDF=CHR+(27) THEN GOTO 780 
590-—1IF- ECMDS="A"-OR-CMD+="a" THEN St= 
"MAREH “"RESTORE 1420:G60TO 700 
5390-1F CMDF="E"- OR CMDF$="b" THEN S$= 
“STARS "¿*RESTORE 15310:G0TO 700 
600 IF CMDF="C" OR CME*="c"- THEN S+= 
"EORTY-":RESTORE-1200:G60TO 700 
610 IF CMD+="D" OR CMOs="d" THEN S*+= 
“HAT "+RESTORE 1620:GOTO 700 
620 IF CMODF="E" OR CMD$="e" THEN S+= 
"HUMOR-—":RESTORE -1040:60TO0 700 
630-—1F- CMOs="F" DR -CMOs$="*" THEN St= 


"BUG "¿RESTORE 790:GOTO 700 
640 IF CMOS="G" OR CMOF="g" THEN S+= 
aga "RESTORE-1120:60T0-—700 


6730 1F CMD+="H"- OR -CMOD+S="h" THEN -St= 
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“DANDY "¿RESTORE 1320:GOTO 700 

660 IF CMO+="I" OR CMO+="i" THEN S$= 
"SAKURA" :RESTORE 1780:60T0O 700 

670 IF CMOf="J" OR CMOF="j" THEN S*+= 
"BELUE —"¿RESTORE 870:GOTO 700 

6280 IF CMDE="K" OR CMDS="k"- THEN S$= 
"SCALES" :¿RESTORE 1700:GOTO 700 

690 GOTO 540 

700 PRINT O" "¿OMDE¿"-"S$ 

710 READ D 

720 READ S+:LOCATE 23,1+(40.5-LEN(S+))/2 
730 COLOR 13,4:PRINT S$3:COLOR 0,7 

740 GOSUB 400 

730 S$=STRING*(39," "):LOCATE 23,1: 
COLOR 4,1:PRINT S*:COLOR 0,7 

760 GOTO 530 

770 END 

780 SCREEN 0,1:COLOR 7,0,0:CLS:END 

790 DATA -2,"La Cucaracha -Cancion 
popular mexicana" 

800 DATA 42,1,0,1,42,1,0,1,42,1,0,1,47, 
TL AAA 
HAS O 
A A A =: a e! 

820 DATA 47,1,0,1, 46, DEA TE 10,1,44, 
1,0,1,44,1 0,1, 42,8,0,2,42,1,0,1 

830 DATA A AA 
1,0,3,42,1,0,1,4 42, 140414251011 

840 DATA YARDAS 
E ,0,3,54,2, 56 ad 

850 DATA 51,2,49,2,47,8 

860 DATA -1,-1 

870 DATA -2,"Vals Danubio Azul por J.S. 
Strauss” 

880 DATA 42,4,46,4,49,4,49,4,0,4,61,2,0, 
2,61,2,0,6,58,2,0,2,58,2,10,6,42,4,42,4 
890 DATA 46,4,49,4 

900 DATA 49,4,0,4,61,2,0,2,61,2,0,6,59,2, 
0,2,59,2,0,6,41,4,41,4,44,4,51,4,51,4 
$10-D074-0,463,210,2/63,2,016,399,2,0,2 
920 DATA 59,2,0,6,41,4,41,4,44,4,31,4,301, 
AO O OO O AAA 
930 DATA 0,6,42,4 

940 DATA 42,4,46,4,49,4,54,4,0,4,66,2,0,2, 
£6,21018141,2,0,2,61,2,0,6,42,4 

950 DATA 42,4,406,4,49,4,54,4,0,4,166,2,10,2 
960 DATA 66,2,0,6,63,2,0,2,63,2,0,6,44,4, 
AE AA 

970 DATA 49,4,58,16 

980 DATA 54,4,46,4,46,8,44,4,51,8,49,4,42, 


4,0,2,42,2,42,4,0,8,49,2,0,2,47,2 

990 DATA 0,6,479,2,0,2 

1000 DATA 47,2,0,6,49,4,58,16,56,4,479,2,0, 
2,46,2,0,6,49,2,0,2,46,2,0,6,479,4 

1010 DATA 56,16,54,4,49,2,0,2,47,2,0,6,49, 
2,0,2,47,2,0,6,479,4,58,16 

1020 DATA 56,4,49,4,54,4,56,4,59,4,61,9,39, 
4,58,2,58,2,58,4,56,2,0,2,54,4,0,8 

1030 DATA -1,-1 

1040 DATA -2,"Humoresque por LIvorak" 

1050 DATA 47,3,0,2,49,1,47,3,0,2,479,1,51, 
lio lao logos 

TOA AO 
3,0,12,6111559,3,0,2,5611 

1070 DATA 54,3,0,2,54,1,56,3,0,2,54,1, 
A A A A 

1080 DATA 49,24,47,3,0,2,49,1,47,3,0,2, 
AA 
1090—BATA 56531905259, 1,6153,0,2157,1, 

A A A A 

1100 DATA 54,3,0,2,54,1,59,3,0,2,47,1, 
49,6,54,6,47,18 

1110 DATA -1,-1 

1120 DATA -2,"Pop! Goes the Weasel - 
Anonimo” 

E AAA 
$1,52,54,2/81,2347,2,0,2,42,2 

1140 DATA 47,2,0,2,47,2,49,2,0,2,49,2, 
51,6,47,2,0,2,42,2,47,2,0,2,47,2,49,2 
HS DATA AAA 
EAT AA 

1160 DATA 0,4,59,2,0,2,359,2,/536,2,/0,2,39, 
A A 

1170 DATA 59,2,56,2,0,2,59,2,58,6,54,2, 
AECA 

1180 DATA 56,2,0,2,58,2,59,2,0,4,56,2,0, 
4,49 y2 40 $e $22 2 1 16 yH7 2 

90 AFA E 

1200 DATA -2,"Sinfonia 40 por Mozart" 
I270-DATA-39,2,342734433,2,34,2,34,4, 
55,2,54,2,54,4,62,4,0,4 

A A A TR 
55,2,54,2 

1230 DATA-52,4,52,4,0,4,54,2,52,2,52,4, 
A A 

1240 DATA 52,4,61,4,0,4,61,2,59,2,58,4, 
3 AAA a 

1250 DATA 50,4,50,4,0,4,62,2,61,2,61,4, 
64,4,58,4,61,4 

1260 DATA 59,4,54,4,0,4,62,2,61,2,61,4, 
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Programa 4.8. 


TA 


SN] 


EL TECLADO CONVERTIDO 
EN PIANO 


ASTA ahora el ordenador ha sido el único intérprete de to- 
das las melodías y, desde luego, no lo ha hecho nada mal. 
Sin embargo, también sería interesante que nosotros pu- 
diéramos interpretar las melodías que quisiéramos pero 
para ello necesitaríamos algún instrumento musical 
como, por ejemplo, un piano. En este capítulo vamos a 
ver cómo podemos transformar el teclado de nuestro or- 
denador en un piano que nos permita demostrar a los de- 
más nuestras habilidades musicales. 


EL PIANO-SPECTRUM 


Podemos utilizar el teclado del SPECTRUM para que actúe del mismo 
modo que un teclado de piano, introduciendo notas en unas cuantas te- 
clas seleccionadas. En el momento en que se pulse esa tecla determinada, 
sonará la nota correspondiente en el SPECTRUM. 

El primer paso es elegir las teclas que se van a usar para producir las 
notas musicales. Lógicamente debemos intentar obtener un teclado simi- 
lar al del piano. Por tanto, vamos a elegir la fila intermedia de letras, de 
la A a la L para las notas naturales (teclas blancas del piano), comenzando 
por la A que reproduce el DO medio. Algunas teclas de la fila superior, de 
la Q a la P reproducen las notas sostenidas (teclas negras del piano). 

Para detectar qué tecla se ha tocado, utilizamos el comando INKEYf$, 
que se asigna a la variable A$ en la línea 150. Si pulsamos una tecla dis- 
tinta de las seleccionadas no se oirá nada ya que el control del programa 
volverá a la línea 150. Si por el contrario, pulsamos una de las teclas se- 
leccionadas oiremos la tecla correspondiente. Para asignar el tono adecua- 
do a cada tecla dimensionamos una matriz de 25 elementos (línea 70), cada 
uno de los cuales almacena una frecuencia. Los códigos de las teclas uti- 
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lizadas van desde el 65 (A) hasta el 89 (Y). En la instrucción BEEP, el có- 
digo de la tecla pulsada se obtiene utilizando el comando CODE y restan- 
do 64 para obtener un número entre 1 y 25. De este modo se selecciona 
el elemento de la matriz correspondiente y por tanto la frecuencia asignada. 

Los códigos entre 65 y 89 que no corresponden a ninguna de las teclas 
seleccionadas tienen asignada una frecuencia de 64 (almacenadas en lí- 
neas DATA) que produce un sonido demasiado agudo para que sea percep- 
tible por el oído humano. 

El programa 5.1 recoge todo lo explicado anteriormente para transfor- 
mar el SPECTRUM en un piano. Además dibuja en pantalla un teclado de 
piano con las teclas correspondientes del SPECTRUM para que nos sea más 
fácil la interpretación. 


10 REM ARI 

20 REM * FIANO  *x 

30 REM * SPECTRUM + 

40 REM 0 

e a 

60 GO SUB 200 

70 DIME TZ) 

80 FOR I=1 TO 23 

90 READ F(1) 

100 NEXT 1 

110 DATA 0,64,64,4,3,5 

120 DATA 7,9,64,11,12,14 

130 DATA 64,64,13,64,64,64 

140 DATA 2,6,10,64,1,64,8 

150 LET A+=INKEY*$: IF A$="" THEN GO TO 150 
160 IF CODE A+<65 OR CODE A+>89 THEN GO TO 150 
170 BEEP 0.3,F(CODE A+-64) 
PO-50 0150 

200 REM * DIBUJO DEL TECLADO + 
210 LET B*$=" "+CHR* 133+CHR* 138 
220 FOR I=1 TO 4 
230 PRINT AT 3+1 11881 
240 FOR J=i1 TO 7 

250 IF J=2 OR J=6 THEN —PRINT " A 
260 PRINT Et; l 
270-NEXT-3 

280 NEXT 1 

290 FOR I=0 TO 8 
300 PLOT 14+1x24,80 

310 DRAW 24,0 
320 DRAW 0,64 

330 DRAW -24,0 


LO 


ALA GBETNT A 


00 FIAINI Al 


Programa 5.1. 
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Fig. 5.1. Pantalla empleada en el programa de utilización del SPECTRUM como 
piano. 


Finalmente hay que añadir que siempre podemos ampliar el teclado a 
más escalas aumentando la matriz de frecuencias y las teclas seleccionadas. 


EL PIANO-AMSTRAD E IBM 


Vamos a transformar nuestro AMSTRAD en un piano que abarque tres 
octavas completas. Para ello vamos a utilizar casi todas las teclas. Las filas 
segunda y cuarta interpretan las notas naturales de las tres octavas, mien- 
tras que algunas de las teclas de las filas primera y tercera están asignadas 
a las notas sostenidas (teclas negras del piano). Podemos ver la relación 
entre el piano y el teclado del AMSTRAD en la figura 5.2. 

En el programa 5.2 formamos una cadena con todas las teclas selec- 
cionadas y la almacenamos en la variable T$ (línea 70). A continuación un 
bucle WHILE-WEND nos permite tocar tantas notas como deseemos. En 
la línea 90 establecemos la función INKEY$ que nos permite pulsar una 
tecla. Las condiciones de las líneas 100 a 117 se encargan de comprobar 
que esa tecla no está entre las no seleccionadas. En la línea 120 utilizamos 
la función INSTR para asignar a la variable N el valor de la posición que 
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Fig. 5.2. Relación entre el teclado del AMSTRAD y el del piano. 


A | 


ocupa la tecla pulsada en la cadena T$. Dicho valor N nos permite calcu- 
lar la frecuencia de la nota (línea 130) y el tono (línea 140). Por último, la 
instrucción SOUND de la línea 150 se encarga de interpretar la nota. 

Por otra parte, y al igual que en el programa anterior, la subrutina 180 
dibuja en pantalla el teclado del piano con las tres octavas y las teclas del 
AMSTRAD asociadas. 


REM II II III 
20 REM * TECLADO DE PIANO + 
30 REM + AMSTRAD * 
A AAA 
A e e 
60 GOSUB 180 
70 TéF="O2W3ERST6Y7UI9DOPE”* EOZRAGEVOBNIME y Lg” 
80 WHILE W=0 
90 Né=INKEY+$:1F Né="" THEN GOTO 90 
100 IF N$="1" OR N$="4" OR N$="8" THEN GOTO 90 
105 IF Né="-" OR N$="D" OR N$="H" THEN GOTO 90 
107 IF N$="3" OR N$="3" OR Né="]" OR Né$="XY" THEN GOTO 90 
110 A=ASC(NE) 
115 IF A=9 OR A=16 OR A=127 THEN GOTO 90 
117 IF A=13 OR A=32 OR A=224 THEN GOTO 90 
120 N=INSTR(T+,N+) 
130 F=440%(2” (O+(N-10)/12)) 
140 T=ROUND(125000/F) 
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Programa 5.2. 


En cuanto al piano IBM el programa sería análogo al anterior ya que 
dispone de las instrucciones WHILE-WEND, INKEY$, INSTR y SOUND 
(ésta con sólo dos parámetros). Puede variar un poco la subrutina de di- 
bujo del teclado ya que en IBM el origen de coordenadas para alta reso- 
lución está en el ángulo superior izquierdo mientras que AMSTRAD está 
en el ángulo inferior izquierdo. 
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- ELPIANO COMMODORE 


Para transformar el COMMODORE en un piano hemos seguido el mis- 
mo esquema que para el SPECTRUM, pero en este caso necesitamos dos 
matrices, una para altas frecuencias y otra para bajas. En las líneas DATA 
almacenamos en este caso parejas de números que representan la alta y 
baja frecuencia de cada nota. La función INKEYf$ es sustituida por GET 
A$ que tiene la misma misión. Los POKE son los mismos que hemos uti- 
lizado hasta el momento y no necesitan ningún comentario. 


14 REM qa dde 

20 REN + PIANO * 

30 REM % COMMODORE + 

E is 

SA PRINT CHR*$C<1947:35PEX21825 “PIANO 
66 DIM AL237,AC235 

TO FOR I=1 TO 25 

20 READ ALID.ECI> 

94 HEAT 1 

166 DATA 34.75,0,0,4,4.43.52,94, 294 
114 DATA 45,198,51,97.57,1712,0,0,64,188 
124 DATA 68, 149,76,252,0,40,4,.4,72,169 
134 DATA 4,94,0.0,0.0,38.126.48,127 
144 DATA £1.12%,0,0,36,25.4,.4,354.111 
158 FOR I=54272 10 54296 

166 POKE 1,4 

170 NEXT 1 

1356 POKE 54296.,1% 

190 POKE 54277.352:POKE 54278.124 

200 GET AF:IF As$="" THEN GOTO 2484 

219 IF ASCIATOCES OR ASCCAFO589 THEH GOTO 200 
224 POKE 34276,17 

234 POKE 34272. EC ASCCARI54d) 

244 POKE 14273) ACASCCAS-54 1 

254 FOR I=1 TO 300:NE%T 1 

260 POKE 54270,16 

¿768 GOTO 244 


Programa 5.3. 
Conviene indicar que las teclas seleccionadas para el piano son las mis- 
mas que en el SPECTRUM, es decir, de la A a la L para las notas naturales 


y de la O a la P para las notas sostenidas. 
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34 


SONIDOS ESPECIALES - 


- ARA finalizar el tema de los sonidos con ordenador no po- 
día faltar un capítulo dedicado a los sonidos especiales. 
Efectivamente, el ordenador no sólo es capaz de producir 
música sino también toda una variada serie de interesan- 
tes efectos sonoros que puede ir desde una explosión has- 
ta un helicóptero, sin olvidar al «ordenador-compositor» 
capaz de generar música aleatoria. 


EFECTOS SONOROS 


Vamos a comenzar por el estudio de unos cuantos efec- 
tos sonoros en distintos ordenadores. Estos efectos suelen ser bastante in- 
teresantes de cara al diseño de videojuegos. 

Comencemos por la generación de un trino: 


REM dd dd dd 
REM x* TRINOS + 
REM * SPECTRUM +* 
REM IA 
CLS 

PRINT AT 11,13;"TRINOS" 
FOR I=1 TO 4 

FOR J=1 TO 50 
BEEP 0,.02,40 
BEEP 0.02,40+1 
NEXT J 

PAUSE 25 

NEXT 1 


Programa 6.1. 


El programa 6.1 produce un tipo de sonido gorgojeante mediante la su- 
cesión de un trino de dos sonidos. Podemos cambiar los valores de la fre- 
cuencia del segundo sonido y comprobar los efectos que produce. 

El programa 6.2 produce el efecto de caída de una bomba que final- 


mente explota. 


REM HI RNA 
REM * CAIDA DE BOMBA * 


REM * AMSTRAD se 
REM AAA 
CLS 

LOCATE 19,13:PRINT "CAIDA" 


FOR I=50 TO 150 
SOUND 1,1,3,15,0,0,0 
NEXT 


100 LOCATE 16,13:PRINT "EXFLOSION' 
110 FOR I=1 TO 100 

120 SOUND 1,1,3,15,0,0,31 

130 NEXT 


Programa 6.2. 


Para producir este sonido en el AMSTRAD dividimos el programa en 
dos partes. La primera es un bucle que produce un sonido con un valor 
de tono creciente. La segunda parte, correspondiente a la explosión, pro- 
duce dicho efecto añadiendo ruido al sonido mediante el último paráme- 
tro de SOUND (el ruido tiene que estar en el rango 0-31). 

El programa 6.3 simula un grito de muñeca en el COMMODORE: 


REN HARAPEEECCPRAA CERA 
REM GRITO DE MUNECAS 
REM + COMMODORE + 
PETT AAA AAA AAA 
PRINT CHRF$<147> 

PRINT SPC<212; "GRITO DE MUNECAS" 
FOR I=34272 TO 54296 
FPOKE 1:68 

NEXT 1 

POKE 34296,15 

POKE 54276,63 

PORKE 34277.13 


130 FOR I=200 TO S STEP -2 
1490 FOKE 54273. 40:POKE 34272.1 


HET 1 

FOR I=154 TO S STEP -2 
POKE 54273, 4B:POKE 34272. 1 
NEXT 1 


Programa 6.3. 
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El efecto se consigue con dos bucles decrecientes que producen la va- 
riación de las bajas frecuencias. 
Otro ejemplo interesante es el sonido de una sirena. 


10 REM ARA 
20-REM-*-—SIRENA + 

30 REM * SPECTRUM * 

BO REM 
SUE 

60 PRINT AT 11,1335"SIRENA” 
70 FOR l=53 TO 15 - 
S80—REE*—001T 

90 NEXT 1 

NAAA AAA AA 
110 BEEP 0.01,1 - 
UNETE 
130 GO TO 70 


Programa 6.4. 


Este sonido lo produce el SPECTRUM mediante dos bucles que se al- 
ternan, uno creciente y otro decreciente que producen la variación de la 
frecuencia del sonido. 

El programa 6.5 produce el sonido de un helicóptero en vuelo. 


10 REM end 
20 REM * HELICOPTERO * 


30 REM x MSX * 
BO REM IR III A 
HA 


60 LOCATE 15,11:PRINT "HELICOPTERO" 
70 FOR I=0 TO 13 

80 READ D 

90 SOUND 1,D 

100 NEXT 

110 RESTORE 

120 GOTO 70. 

130 DATA 200,15,200,15,200,15 

140 DATA 0,7,23,23,23,255,1,12 


Programa 6.5. 


Este programa ha sido desarrollado en MSX por lo que es necesario ma- 
nejar los 13 registros de SOUND para producir el sonido. 
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El sonido de una alarma también resulta interesante de cara al diseño 
de videojuegos. 


Programa 6.6. 


El programa 6.6 reproduce el efecto de una alerta en AMSTRAD. Para 
que el sonido resulte más real se ha generado una envolvente de tono con 
una sección. 

Finalmente el programa 6.7 produce el sonido de un grifo goteando en 
IBM. 


Programa 6.7. 


A 


MUSICA ALEATORIA 


Finalmente vamos a desarrollar un programa para generar música alea- 
toria con el SPECTRUM. 
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El inconveniente de la música aleatoria es que no siempre resulta agra- 
doble a los oídos, sin embargo siempre es una experiencia interesante. 


10 REM AXKKLLELE EEE EK 
20 REM * MUSICA ALEATORIA * 


30—REM-+* SPECTRUM * 
40 REM AAA A RARA AAA 
SO0-EES 


60 PRINT AT 10,8;"MUSICA ALEATORIA" 

70 DIM N$(12,4) 

80 FOR I=1 TO 12 

90 READ NéC(T) 

100 NEXT 1 

110 DATA "DO","DOR","RE","REH" 

120 DATA "MI","FA", "FAR" ,"SOL” 

130 DATA "SOL+$","LA","LAR","SI" 

140 RANDOMIZE O: LET NOTA=0 

150 LET N=INT  (RND*8B) 

160 LET D=INT (RNDx*200)/100 

170 LET S=INT (RNDx*2) 

180 LET NO=NOTA 

190 IF S=0 THEN LET NOTA=NOTA-N: GO TO 210 
200 LET NOTA=NOTA+N 

210 IF NOTA<1 THEN LET NOTA=NOTA+12: GO TO 210 
220 IF NOTA*+12 THEN LET NOTA=NOTA-12: GO TO 220 
230 PRINT AT 14,14¿N3(NOTA)¿" " 
240 RBEEP D,NO 

250 60 TO 150 


Programa 6.8. 


El bucle FOR-NEXT de las líneas 80-100 almacena en una matriz los 
nombres de las notas de una escala cromática; dichos nombres los lee de 
las líneas DATA 110-130. En la línea 150 se genera un número al azar en- 
tre 0 y 7 que, según el valor que tome la variable S (0 ó 1), se sumará o 
restará a la variable NOTA determinando el tono que va a sonar. En la lí- 
nea 160 se genera otro número al azar que determina la duración de la nota. 

Hasta aquí hemos recorrido parte del camino en la experimentación del 
sonido con ordenador, queda mucho por descubrir, sigamos investigando. 
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APENDICES 


EL COMANDO SOUND 
EN EL COMMODORE 


A capacidad de generación de sonido del COMMODORE 
sólo es posible a través de un montón de POKEs. 

Los problemas son más graves si pensamos que el chip 
de sonido del COMMODORE exige un determinado orden 
en la ejecución de los POKESs. Por ejemplo, poner el vo- 
lumen a cero inmediatamente después de una nota puede 


=> producir un «click» poco musical, mientras que seleccio- 


nar la forma de onda antes de activar el generador de en- 
volvente no produce ningún sonido. Es mucho mejor, evi- 


dentemente, disponer de un único comando SOUND que se encargue de 
todo de una manera sencilla y eficaz. 


== SOUND 


Sintaxis: 


Donde: 


SOUND (voz), (tono), (volumen), (A), (D), (S), (R), (forma 
de onda), (ciclo de trabajo). 

(voz) selecciona una de las tres voces del SID, numeradas de 
0a2. 

(tono) define la frecuencia del oscilador seleccionado ante- 
riormente entre 0 y 65535. 

(volumen) define el volumen desde 0 (silencio) a 15. 

(A) define el parámetro tiempo de ataque de la envolvente. 
(D) define el parámetro tiempo de decaimiento de la envol- 
vente. 

(S) define el parámetro tiempo de sostenimiento de la envol- 
vente. 

(R) define el parámetro tiempo de relajación de la envolven- 
te. 
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(forma de onda) selecciona el tipo de onda: O=triangular; 
1=diente de sierra; 2=rectangular, y 3=ruido. 

(ciclo de trabajo) define el ancho del pulso o ciclo de traba- 
jo de la onda rectangular. Sólo es aplicable si selecciona este 
tipo de onda. El rango efectivo es entre 0 y 4096. 


SOUND no requiere siempre todos los parámetros. Por ejemplo, es po- 
sible obtener una nota sólo con SOUND 0,40000. 

SOUND toma ciertos valores por defecto, ya que el chip SID requiere 
en general que se inicialicen todos los parámetros para cada sonido. Los 
valores por defecto para el comando mínimo SOUND (voz),(tono) son: for- 
ma de onda triangular, A,D,S,R igual a 0,9,0,0 y el máximo volumen. Ob- 
serve que si se especifica uno cualquiera de los parámetros ADSR debe ha- 
cerse lo mismo con los otros tres, y que si se selecciona la forma de onda 
2 (rectangular), debe especificarse la anchura de los pulsos. Después de 
producida la nota, se deja que el sonido se amortigiie libremente, lo que 
puede producir una vibración permanente para ciertas envolventes. En 
este caso el sonido deberá desactivarse después de cierto tiempo con un 
comando SOUND (voz) —por ejemplo, SOUND 0O— para desactivar la voz 
0. SOUND sin parámetros tiene el efecto de borrar todos los registros y 
«dormir» al SID después de un «click». 

Trabajar con más de una voz no es problema. Simplemente ejecute dos 
o tres SOUND, uno después de otro. Por ejemplo: 


10 SOUND 0,4461 
20 SOUND 1,5619 
30 SOUND 2,6675 


tocarán un acorde en tono de DO. 
Listado en ENSAMBLADOR: 


1000 *=$8F00 


1020 WAVEF  =$0336 
1630 VOLUM =$0337 
1040 VOIC  =$0338 
1950 3 == 
1060 ¡-—DESACTIVA TODOS LOS CANALES-- 
1070 ;SI NO HAY PARAMETROS BORRA TODOS 
1980 ¿LOS REGISTROS DEL SID 


1090 5 id 
1106 SOUN  BNE SOUN2 
1110 3 —============--- 
1120 LDX $*$18 
1130 LDA *s$00 
1140 SOULP STA $D400,X 
1150 DEX 
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11650 
11709 
1186 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1266 
1270 
1280 
1290 
1300 
1310 

1320 
13460 
1350 
1360 
1370 
1380 
1396 
1400 
1410 
1426 
1430 
1440 
1450 
1460 
1476 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1591 
1500 
16510 
1620 
1630 


BPL SOULP 
RTS 


3-—OBTIENE EL NUMERO DE CANAL O VOZ 
¿RECHAZA VALORES MAYORES QUE 2/ BO- 
¿RRA EL REGISTRO DE FORMA DE ONDA 
DES CANAL ELEGIDO 


LDA *$00 
LDY VDICB7,X 
STA $D404,Y 


ERSOU LDX $*$0E 
JMP ($0300) 


¿-—-OBTIENE EL PARAMETRO FRECUENCIA- 
¡LO GUARDA EN LOS REGISTROS DEL CA- 
ENE ELEGIDO 
SOUN3 JSR SAEFD 

JSR SADBA 

JSR $B7F7 

LDX VODIC 


LDA $14 


¿-—-OBTIENE EL PARAMETRO VOLUMEN-- 
¿SI NO SE ESPECIFICA, EL VALOR POR 
A ES EL MAXIMO 


DFOLT  LDA *s0F 
ORA $D418 
STA $D418 
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1540 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
eS 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 


1991 


2000 
2010 
20206 
2030 
2040 
2050 
2060 
2070 
2080 
2090 


JSR $0079 
BEQ DFOLTO 


¿-—OBTIENE LOS PARAMETROS DE LA 
¡ ENVOLVENTE=- 
¿SI NO SE ESPECIFICAN, LOS VALORES 


DFOLTO LDX VOIC 
LDY VDICB7,X 
LDA *$09 


LDX VOIC 

LDY VODICB7, X 
STA $D405, Y 
JSR ATKDCY 
LDX VDIC 

LDY VDICE7,X 
STA $D406,Y 


¿--OBTIENE LA FORMA DE ONDA-- 
SEL VALOR POR DEFECTO ES O = TRIAN- 
¿GULAR / 1 = DIENTE DE SIERRA , 


STA WAVEF 
JSR $0079 


TAX 


LDA WAVE, X 
STA WAVEF 
CMP 4$41 

BNE DFOLTZ 


+ LA FORMA DE ONDA SON PULSOS, 
EME. LA ANCHURA DE LOS MISMOS 


LDX VDIC 
LDY VODICB7,X 
LDA $14 

STA $D402, Y 

LDA $15 

AND $$0F 

STA $D403,Y 


¡-—TOCA LA 
¿ACTIVANDO 
¿GISTRO DE 


NOTA-- 
EL BIT DE PUERTA DEL RE- 
FORMA DE ONDA DEL CANAL 


¡ESPECIFICADO 

DFOLT2 LDX VOIC 
LDY VOICB7,X 
LDA WAVEF 
STA $D404, Y 


¡-—OBTIENE LOS VALORES ADSR-- 
A DOS SEMIOCTETOS EN UN BYTE 


ATKDCY JSR SAEFD 
JSR $E79E 
TXA 
ASL A 
ASL A 
ASL A 
ASL A 
STA WAVEF 
JSR SAEFD 
JSR $B779E 
TXA 
AND *$S0F 
ORA WAVEF 
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2570 RTS 

2580 3 ===> 

2590 ¿-—-TABLA CON LOS VALORES DE LAS 
2591 ¿FORMAS DE ONDA-- 

2600 q === 

2610 ¡WAVE  .BYTE $11,$21,$41,$81 
2620 === 

2630 ;-—TABLA DE CANALES (PARA INDEXADO) 
LyÑAD q ooo ooo 

2650 VOICB7 .EYTE $09,507, $0E 

2660 3 =============--- 


Cargador BASIC 


100 C=0 

101 READ Ds 

102 IF D$="END" THEN PRINT D$1GOTO1000 
103 D=VAL(D$): 1F D<O THEN 106 

104 X=X+1:C=C+D3POKE 36607+X,D 

105 GOTO 101 

106 IF C=ABS(D) THEN 100 

107 PRINT"ERROR EN EL BLOQUE"; 1+INT((X-.5)/64) 
108 GOTO 100 

110 REM --- BLOQUE 1 

111 DATAZ08,11,162,24,169,0,157,0 
112 DATA212,202,16,250,96,32,158,183 
113 DATA224,3,176,17,142,56,3,169 
114 DATAO, 188,246,143,153,4,212,32 
115 DATA121,0,208,6,96,162,14,108 
116 DATAO,3,32,253,174,32,138,173 
117 DATA32,247,183,174,56,3,188,246 
118 DATA143,165,20,153,0,212,165,21 
119 DATA-7176 

120 REM --- BLOQUE 2 

121 DATA153,1,212,169,15,13,24,212 
122 DATA141,24,212,32,121,0,240,20 
123 DATA32,253,174,32,158,183,142,55 
124 DATA3,173,24,212,41,240,13,55 
125 DATA3,141,24,212,174,56,3,188 
126 DATA246,143,169,9,153,5,212,169 
127 DATAO,153,6,212,32,121,0,240 

128 DATA24,32,215,143,174,56,3,188 
129 DATA-6885 

130 REM --- BLOQUE 3 

131 DATA246,143,153,5,212,32,215,143 
132 DATA174,56,3,188,246,143,153,6 
133 DATAZ212,169,17,141,54,3,32,121 
134 DATAO, 240,47,32,253,174,32,158 
135 DATA183,138,41,3,170,189,242,143 
136 DATA141,54,3,201,65,208,27,32 


137 DATA253,174,32,138,173,32,247,183 
138 DATA174,56,3,188, 246, 143, 165, 20 
139 DATA- -7870 

140 REM --- BLOQUE 4 


141 DATA153,2,212,165,21,41,15,153 
142 DATA3,212,174,56,3,188,246,143 
143 DATA173,54,3,153,4,212,96,32 

144 DATA253,174,32,158,183,138,10,10 
145 DATA10,10,141,54,3,32,253,174 

146 DATA32,158,183,138,41,15,13,54 
147 DATA3,96,17,33,65,129,0,7 

148 DATA14 

149 DATA-5147 

150 DATAEND 

1000 REM --ENCADENA EL NUEVO COMANDO-- 
1001 REM -— SOUND 

1002 POKE33337,2551 POKE33338, 142 

1003 END 


Programa A.l. 


LA RUTINA SOUND 


Selección de la voz o canal (líneas 1100-1370). 


Si no hay parámetros, el bucle de las líneas 1120-1170 pone a cero to- 
dos los registros del SID, y después vuelve al BASIC. Si el número de ca- 
nal especificado es mayor que 2, se rechaza y causa una salida de error a 
través de las líneas 1410-1420. Si el parámetro es legal, se guarda prime- 
ramente en VOIC y se utiliza luego para indexar la tabla VOICB7 (que con- 
tiene los posibles valores de canal multiplicados por 7) y borrar el registro 
de forma de onda de las líneas 1240-1300. Observe que se utiliza VOICB7 
porque los registros del SID correspondientes a cada voz están separados 
7 bytes. Así, por ejemplo, el registro de forma de onda de la voz O está en 
$d404+0; el de voz 1, en $D404 + 7, y el de la voz 2, en $D404 + 14. Si no 
hay más parámetros, se sale al BASIC. 


Selección del tono (líneas 1480-1560) 

Este parámetro se guarda en los registros de frecuencia de la voz corres- 
pondiente. 
Selección del volumen (líneas 1610-1730) 

Sólo hay un registro de volumen para las tres voces y, por tanto, sim- 


plemente guardamos el valor en el mismo. Este registro comparte otra fun- 
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ción, ya que los 4 bits de mayor peso seleccionan el filtro y, por consi- 
guiente, debemos tener cuidado de no modificar estos bits. Este paráme- 
tro es opcional, y el valor por defecto es el máximo (15). 


Selección de la envolvente (líneas 1790-1950) 


Una única rutina, ATKDCY, en la línea 2440 guarda los valores de ata- 
que/decaimiento y sostenimiento/relajación. Esta rutina obtiene 2 bytes 
entre 0 y 15 separados por comas, y los combina con el único byte. Como 
el volumen de estos parámetros son opcionales, siendo los valores por defec- 
to 0,9,0,0 para A,D,S y R. Sin embargo, si se especifica uno de ellos, deben 
definirse todos los demás. 


Selección de la forma de onda (líneas 2010-2140) 


El valor por defecto es 0, onda triangular. Un 1 genera diente de sierra; 
un 2, una onda rectangular, y un 3, ruido. Si se elige la onda 2, rectangu- 
lar, debe especificarse la anchura del pulso, o se producirá un error de sin- 
taxis. Este valor puede ser hasta 65535, pero el rango efectivo es entre 0 y 
4096, ya que el registro es de 12 bits. 


Producción de una nota (líneas 2340-2380) 


Una vez situados todos los parámetros, se produce la nota al escribir el 
valor de la forma de onda seleccionada en el registro correspondiente, y 
luego se sale al BASIC. 


96 


Una de las posibilidades más apasionantes 
de los ordenadores, aunque menos 
conocida, es la generación de sonidos. 


Gracias a estas posibilidades, la 
composición musical deja de ser privilegio 
de unos pocos afortunados. 


En este libro descubrirá cómo elaborar 
sonidos y aprovecharlos en la 
composición de melodías populares. 
Además, podrá convertir su ordenador en 
un instrumento musical, pudiendo dar 
rienda suelta a su imaginación sin haber 
estudiado solfeo. 


